diff options
Diffstat (limited to 'Build/source/texk/web2c/omegaware/ovf2ovp.web')
-rw-r--r-- | Build/source/texk/web2c/omegaware/ovf2ovp.web | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/omegaware/ovf2ovp.web b/Build/source/texk/web2c/omegaware/ovf2ovp.web index 30fc71c9e03..280a0641372 100644 --- a/Build/source/texk/web2c/omegaware/ovf2ovp.web +++ b/Build/source/texk/web2c/omegaware/ovf2ovp.web @@ -1463,17 +1463,17 @@ appropriate conversion of ASCII codes. Three other little strings are used to produce |face| codes like \.{MIE}. @<Glob...@>= -@!ASCII_04,@!ASCII_10,@!ASCII_14,HEX: packed array [1..32] of char; +@!ASCII_04,@!ASCII_10,@!ASCII_14: packed array [1..32] of char; {strings for output in the user's external character set} @!xchr:packed array [0..255] of char; @!MBL_string,@!RI_string,@!RCE_string:packed array [1..3] of char; {handy string constants for |face| codes} +@!HEX: packed array [1..16] of char; @ @<Set init...@>= ASCII_04:=' !"#$%&''()*+,-./0123456789:;<=>?';@/ ASCII_10:='@@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_';@/ ASCII_14:='`abcdefghijklmnopqrstuvwxyz{|}~?';@/ -HEX:='0123456789ABCDEF';@/ for k:=0 to 255 do xchr[k]:='?'; for k:=0 to @'37 do begin xchr[k+@'40]:=ASCII_04[k+1]; @@ -1481,6 +1481,7 @@ for k:=0 to @'37 do begin xchr[k+@'140]:=ASCII_14[k+1]; end; MBL_string:='MBL'; RI_string:='RI '; RCE_string:='RCE'; +HEX:='0123456789ABCDEF';@/ @ The array |dig| will hold a sequence of digits to be output. |