diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/test/let-env.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/test/let-env.scm b/tests/test/let-env.scm index e3dc5927..a989776a 100644 --- a/tests/test/let-env.scm +++ b/tests/test/let-env.scm @@ -41,3 +41,8 @@ (getenv "CALP_TEST_ENV")) +(test-group "Unsetting environment" + (setenv "TEST" "A") + (let-env ((TEST #f)) + (test-assert (not (getenv "TEST")))) + (test-equal "A" (getenv "TEST"))) |