summaryrefslogtreecommitdiffstats
path: root/values.scm
diff options
context:
space:
mode:
Diffstat (limited to 'values.scm')
-rw-r--r--values.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/values.scm b/values.scm
index b47e0f8..23d3a1b 100644
--- a/values.scm
+++ b/values.scm
@@ -8,7 +8,7 @@
(define values:*values-rtd*
(make-record-type "values"
'(values)))
-
+;@
(define values
(let ((make-values (record-constructor values:*values-rtd*)))
(lambda x
@@ -16,7 +16,7 @@
(null? (cdr x)))
(car x)
(make-values x)))))
-
+;@
(define call-with-values
(let ((access-values (record-accessor values:*values-rtd* 'values))
(values-predicate? (record-predicate values:*values-rtd*)))