diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2023-10-27 10:48:55 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2023-10-27 10:48:55 +0000 |
commit | 86105d23a60c9ce2f30460344e71278166389acb (patch) | |
tree | edba0fe233685cca8f1fccdfe3747b2c634e7af1 /Build/source/texk/web2c | |
parent | 451899cd0b8c4ab3bf36687b1d80638a994ad234 (diff) |
[WEB] Arithmetic abnormality.
git-svn-id: svn://tug.org/texlive/trunk@68671 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c')
-rw-r--r-- | Build/source/texk/web2c/weav-twill.ch | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/weav-twill.ch b/Build/source/texk/web2c/weav-twill.ch index 7fb50198a52..f43a03bf660 100644 --- a/Build/source/texk/web2c/weav-twill.ch +++ b/Build/source/texk/web2c/weav-twill.ch @@ -940,7 +940,7 @@ exit:end; procedure out_const(@!n:sixteen_bits); var a,k:integer; begin a:=n; k:=0; -if a>=32768 then +if a>=65536 then begin out("-"); a:=131072-a; end; repeat dig[k]:=a mod 10; a:=a div 10; incr(k); |