summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/eptexdir/fam256.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/eptexdir/fam256.ch')
-rw-r--r--Build/source/texk/web2c/eptexdir/fam256.ch4
1 files changed, 4 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/eptexdir/fam256.ch b/Build/source/texk/web2c/eptexdir/fam256.ch
index 2acae50fde0..f0e3c34d35b 100644
--- a/Build/source/texk/web2c/eptexdir/fam256.ch
+++ b/Build/source/texk/web2c/eptexdir/fam256.ch
@@ -134,8 +134,12 @@ else begin print_esc("scriptscriptfont");
@z
%-----------------------------------------------
@x
+for k:=0 to 255 do del_code(k):=-1;
del_code("."):=0; {this null delimiter is used in error recovery}
@y
+for k:=0 to 255 do
+ begin del_code(k):=-1; setintone(eqtb[del_code_base+k],-1);
+ end;
del_code("."):=0; setintone(eqtb[del_code_base+"."],0);
{this null delimiter is used in error recovery}
@z