diff options
Diffstat (limited to 'Build/source/texk/web2c/dvicopy.ch')
-rw-r--r-- | Build/source/texk/web2c/dvicopy.ch | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/dvicopy.ch b/Build/source/texk/web2c/dvicopy.ch index 5060d215ebe..81f51d9d18a 100644 --- a/Build/source/texk/web2c/dvicopy.ch +++ b/Build/source/texk/web2c/dvicopy.ch @@ -508,13 +508,13 @@ rewrite(out_file); {prepares to write packed bytes to |out_file|} @x [250] String declaration. @!comment:packed array[1..comm_length] of char; {preamble comment prefix} @y -@!comment:const_w2c_u_string; {preamble comment prefix} +@!comment:const_c_string; {preamble comment prefix} @z @x [251] Output the string from 0 to len-1, not 1 to len. for k:=1 to comm_length do append_byte(xord[comment[k]]); @y -for k:=0 to comm_length - 1 do append_byte(xord[comment[k]]); +for k:=0 to comm_length - 1 do append_byte(xord[ucharcast(comment[k])]); @z @x [] System-dependent changes. |