diff --git a/collects/tests/mzscheme/optimize.ss b/collects/tests/mzscheme/optimize.ss index 94a7b5e61a..a7f394d7eb 100644 --- a/collects/tests/mzscheme/optimize.ss +++ b/collects/tests/mzscheme/optimize.ss @@ -185,6 +185,7 @@ (bin #f '< 100 100) (bin #t '< -200 100) (bin #f '< 100 -200) + (bin #t '< 1 (expt 2 30)) (bin #t '<= 100 200) (bin #f '<= 200 100) @@ -197,6 +198,7 @@ (bin #f '> 100 100) (bin #f '> -200 100) (bin #t '> 100 -200) + (bin #f '> 1 (expt 2 30)) (bin #f '>= 100 200) (bin #t '>= 200 100)