summaryrefslogtreecommitdiff
path: root/tests/test-vikalpa.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/test-vikalpa.scm')
-rw-r--r--tests/test-vikalpa.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/test-vikalpa.scm b/tests/test-vikalpa.scm
index 961d683..644cb6a 100644
--- a/tests/test-vikalpa.scm
+++ b/tests/test-vikalpa.scm
@@ -418,4 +418,10 @@
(test-equal '()
(system-check (test)))
+(test-equal '(result/expr (quote b))
+ (system-eval (test) '(if #f 'a 'b)))
+
+(test-equal '(result/expr (quote b))
+ (system-eval (test) '(if '#f 'a 'b)))
+
(test-end "test-vikalpa")