diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2015-01-19 08:32:16 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2015-01-19 08:32:16 +0000 |
commit | c8441c7824f0922397522ab135488f5b7277de63 (patch) | |
tree | 58056c720814345008e99f9d4ebe78580de64b7c /Build/source/texk/web2c/tftopl.ch | |
parent | a4b837123f55ac4572fb8555f20d1aea9d295ab5 (diff) |
texk/web2c: Remove intcast(), obsolete for 32/64-bit systems
git-svn-id: svn://tug.org/texlive/trunk@36091 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/tftopl.ch')
-rw-r--r-- | Build/source/texk/web2c/tftopl.ch | 6 |
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 |