summaryrefslogtreecommitdiff
path: root/testsuite/t-values.scm
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/t-values.scm')
-rw-r--r--testsuite/t-values.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/t-values.scm b/testsuite/t-values.scm
new file mode 100644
index 000000000..e741ae423
--- /dev/null
+++ b/testsuite/t-values.scm
@@ -0,0 +1,8 @@
+(use-modules (ice-9 receive))
+
+(define (do-stuff x y)
+ (values x y))
+
+(call-with-values (lambda () (values 1 2))
+ (lambda (x y) (cons x y)))
+