diff --git a/src/voc/OPB.Mod b/src/voc/OPB.Mod
index 1bf703a4..6e4430d0 100644
--- a/src/voc/OPB.Mod
+++ b/src/voc/OPB.Mod
@@ -409,6 +409,9 @@ MODULE OPB;  (* RC 6.3.89 / 21.2.94 *)  (* object model 17.1.93 *)
           END ;
           z^.typ := OPT.booltyp
       | adr: (*SYSTEM.ADR*)
+		  IF (z^.class = Nconst) & (f = Char) & (z^.conval^.intval >= 20H) THEN
+		    CharToString(z); f := String
+		  END ;
           IF (z^.class < Nconst) OR (f = String) THEN z := NewOp(op, typ, z)
           ELSE err(127)
           END ;
diff --git a/vocstatic.linux.gcc.x86_64 b/vocstatic.linux.gcc.x86_64
index a7a837dd..a113ad22 100755
Binary files a/vocstatic.linux.gcc.x86_64 and b/vocstatic.linux.gcc.x86_64 differ