diff --git a/scheme/tests/div-and-mod.ss b/scheme/tests/div-and-mod.ss index 900c2b1..960e0e7 100644 --- a/scheme/tests/div-and-mod.ss +++ b/scheme/tests/div-and-mod.ss @@ -71,7 +71,18 @@ (test +10 -4) (test -10 +4) (test -10 -4) - + + (test +3 +5/6) + (test -3 +5/6) + (test +3 -5/6) + (test -3 -5/6) + + (test +3 +7/11) + (test -3 +7/11) + (test +3 -7/11) + (test -3 -7/11) + + (test (least-fixnum) +1) (test (least-fixnum) -1) ;; overflows (test (greatest-fixnum) +1)