summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/tftopl.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/tftopl.ch')
-rw-r--r--Build/source/texk/web2c/tftopl.ch6
1 files changed, 0 insertions, 6 deletions
diff --git a/Build/source/texk/web2c/tftopl.ch b/Build/source/texk/web2c/tftopl.ch
index f2fa5894633..b0c1ba581ff 100644
--- a/Build/source/texk/web2c/tftopl.ch
+++ b/Build/source/texk/web2c/tftopl.ch
@@ -223,12 +223,6 @@ else begin tfm[0]:=c; out_octal(0,1);
put_byte(RCE_string[1+(b div 3)], pl_file);
@z
-@x [40] Force 32-bit constant arithmetic for 16-bit machines.
-f:=((tfm[k+1] mod 16)*@'400+tfm[k+2])*@'400+tfm[k+3];
-@y
-f:=((tfm[k+1] mod 16)*intcast(@'400)+tfm[k+2])*@'400+tfm[k+3];
-@z
-
% [78] No progress reports unless verbose.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@x