diff options
-rw-r--r-- | test-suite/tests/00-initial-env.test | 6 | ||||
-rw-r--r-- | test-suite/tests/eval.test | 4 |
2 files changed, 5 insertions, 5 deletions
diff --git a/test-suite/tests/00-initial-env.test b/test-suite/tests/00-initial-env.test index 66d960f0b..3b3fe3aa7 100644 --- a/test-suite/tests/00-initial-env.test +++ b/test-suite/tests/00-initial-env.test @@ -41,4 +41,8 @@ (pass-if-exception "2nd argument bool" exception:wrong-type-arg - (+ 1 #f)))) + (+ 1 #f)) + + (pass-if-exception "implicit forcing is not supported" + exception:wrong-type-arg + (+ (delay (* 3 7)) 13)))) diff --git a/test-suite/tests/eval.test b/test-suite/tests/eval.test index fd5d75087..8c0652215 100644 --- a/test-suite/tests/eval.test +++ b/test-suite/tests/eval.test @@ -302,10 +302,6 @@ exception:wrong-type-arg (force 1)) - (pass-if-exception "implicit forcing is not supported" - exception:wrong-type-arg - (+ (delay (* 3 7)) 13)) - (pass-if "unmemoizing a promise" (display-backtrace (let ((stack #f)) |