vishapoberon/compiler
1
0
Fork 0
mirror of https://github.com/vishapoberon/compiler.git synced 2026-04-06 18:02:25 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix

Browse source
This commit is contained in:
Norayr Chilingarian 2014-09-17 20:01:24 +04:00
parent 9892f9205c
commit 69defc9ce0
2 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/voc/OPM.cmdln.Mod
View file

@ -695,13 +695,13 @@ MODULE OPM; (* RC 6.3.89 / 28.6.89, J.Templ 10.7.89 / 22.7.96 *)
(* we can do (* we can do
MinLInt := ASH(-2, LIntSize*8-2); MinLInt := ASH(-2, LIntSize*8-2);
but some compilers may treat -2 as SHORTINT, not LONGINT; -- noch *) but some compilers may treat -2 as SHORTINT, not LONGINT; -- noch *)
MinSInt := ASH(Base, SIntSize*8-2); MinSInt := ASH(base, SIntSize*8-2);
MaxSInt := minus(MinSInt + 1); MaxSInt := minus(MinSInt + 1);
MinInt := ASH(Base, IntSize*8-2); MinInt := ASH(base, IntSize*8-2);
MaxInt := minus(MinInt + 1); MaxInt := minus(MinInt + 1);
MinLInt := ASH(Base, LIntSize*8-2); MinLInt := ASH(base, LIntSize*8-2);
MaxLInt := minus(MinLInt +1); MaxLInt := minus(MinLInt +1);
(* (*

BIN
voc
View file

Binary file not shown.