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

Make math test work across x86/x64.

Browse source
This commit is contained in:
David Brown 2016-10-17 12:49:05 +01:00
parent eda7e88185
commit 2d8c9c4757
201 changed files with 545 additions and 568 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/runtime/Out.Mod
View file

@ -133,13 +133,13 @@ BEGIN
dr := n-6; (* Leave room for dp and '+D000' *)
IF dr > 17 THEN dr := 17 END; (* Limit to max useful significant digits *)
d := dr; (* Number of digits to generate *)
IF d < 16 THEN d := 16 END (* Generate enough digits to do trailing zero supporession *)
IF d < 15 THEN d := 15 END (* Generate enough digits to do trailing zero supporession *)
ELSE
el := 2;
dr := n-5; (* Leave room for dp and '+E00' *)
IF dr > 9 THEN dr := 9 END; (* Limit to max useful significant digits *)
d := dr; (* Number of digits to generate *)
IF d < 7 THEN d := 7 END (* Generate enough digits to do trailing zero supporession *)
IF d < 6 THEN d := 6 END (* Generate enough digits to do trailing zero supporession *)
END;
IF e = 0 THEN