diff options
Diffstat (limited to 'tests/test/cpp/cpp-environment.scm')
| -rw-r--r-- | tests/test/cpp/cpp-environment.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/tests/test/cpp/cpp-environment.scm b/tests/test/cpp/cpp-environment.scm index df4736fb..1b24676f 100644 --- a/tests/test/cpp/cpp-environment.scm +++ b/tests/test/cpp/cpp-environment.scm @@ -28,7 +28,7 @@ (let ((e (make-environment))) - (let ((e* (add-identifier! + (let ((e* (add-identifier e "key" (object-like-macro identifier: "key" @@ -36,9 +36,7 @@ (let ((result (get-identifier e* "key"))) (test-assert (macro? result)) (test-equal (lex "value") - (macro-body result)))) - ;; (get-identifier e "key") here is undefined - ) + (macro-body result))))) (let ((e (make-environment))) (let ((result (get-identifier e "key"))) |