aboutsummaryrefslogtreecommitdiffstats
path: root/lib/scheme/base/30-if.csc
diff options
context:
space:
mode:
Diffstat (limited to 'lib/scheme/base/30-if.csc')
-rw-r--r--lib/scheme/base/30-if.csc3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/scheme/base/30-if.csc b/lib/scheme/base/30-if.csc
index 36edc16..6b3519e 100644
--- a/lib/scheme/base/30-if.csc
+++ b/lib/scheme/base/30-if.csc
@@ -2,7 +2,6 @@
and
boolean=?
boolean?
- case-lambda
cond
if
not
@@ -81,6 +80,8 @@
(begin result1 result2 ...)))))
+ ; This is a secret copy of case-lambda.
+ ; The real one is defined in the (scheme case-lambda) library.
(define-syntax case-lambda
(syntax-rules ()
((case-lambda (params body0 ...) ...)