diff options
| -rw-r--r-- | lib/scheme/base/30-if.csc | 3 |
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 ...) ...) |