mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-01 04:10:18 +02:00
("evaluator" "memoization"): New test prefix block.
("transparency"): New "evaluator memoization" test.
This commit is contained in:
parent
7c582ec9b5
commit
414959cad8
1 changed files with 9 additions and 0 deletions
|
@ -57,6 +57,13 @@
|
|||
|
||||
(with-test-prefix "evaluator"
|
||||
|
||||
(with-test-prefix "memoization"
|
||||
|
||||
(pass-if "transparency"
|
||||
(let ((x '(begin 1)))
|
||||
(eval x (current-module))
|
||||
(equal? '(begin 1) x))))
|
||||
|
||||
(with-test-prefix "symbol lookup"
|
||||
|
||||
(with-test-prefix "top level"
|
||||
|
@ -169,3 +176,5 @@
|
|||
exception:out-of-range
|
||||
(map + '(1 2) '(3)))
|
||||
)))
|
||||
|
||||
;;; eval.test ends here
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue