freebsd-ports/print/teTeX-base/files/patch-texk::web2c::etexdir::etex.fix
Hiroki Sato e6f28c081b Add a patch to fix a bug which prevents etex(1) from working. Without
this patch, the following code fragment causes a segmentation fault.

 \toksdef\whatevertoks = 266
 \toksdef\extratoks = 267
 \whatevertoks={junk}
 \everypar{\extratoks=\whatevertoks}
 \immediate\write16{t={\the\toks265}}
 some paragraph\par
 \bye

Approved by:	linimon (mentor)
2004-07-26 13:30:18 +00:00

23 lines
512 B
Text

--- texk/web2c/etexdir/etex.fix.orig Thu Jul 22 12:56:18 2004
+++ texk/web2c/etexdir/etex.fix Thu Jul 22 12:56:53 2004
@@ -1,7 +1,19 @@
% Bugfixes for etex.ch version 2.1
% Public Domain.
-@x l.5503
+@x l.1163 - |int_val| is a level, not a value.
+ begin cur_val:=int_val;
+@y
+ begin cur_val_level:=int_val;
+@z
+
+@x l.2737 - typo
+ else q:=sa_ptr(cur_ptr)
+@y
+ else q:=sa_ptr(cur_chr)
+@z
+
+@x l.5503 - comparison with 0 instead of |null|.
if cur_ptr<>0 then
@y
if cur_ptr<>null then