summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2010-03-31 14:54:43 +0200
committerLudovic Courtès <ludo@gnu.org>2010-03-31 14:54:43 +0200
commit28828f40eb8ea7e10e35aa1e83ebf37449350c08 (patch)
tree2b5e205e7381a7a10d8e44102e314ae0194bcda4
parentcedf24d8bda2439fa0b6de74a6fa4b8105d96004 (diff)
downloadguile-28828f40eb8ea7e10e35aa1e83ebf37449350c08.tar.gz
Move another GOOPS-less test at the beginning.
* test-suite/tests/eval.test ("promises")["extended promise behaviour"]("implicit forcing is not supported"): Move... * test-suite/tests/00-initial-env.test ("goopsless"): ... here.
-rw-r--r--test-suite/tests/00-initial-env.test6
-rw-r--r--test-suite/tests/eval.test4
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))