svn: r1059
This commit is contained in:
parent
76640f4c6c
commit
e6f69f0996
|
@ -288,7 +288,7 @@
|
||||||
;;> (1 #f 3)
|
;;> (1 #f 3)
|
||||||
;;> => ((lambda (x &optional y [z 3]) (list x y z)) 1 2 #f)
|
;;> => ((lambda (x &optional y [z 3]) (list x y z)) 1 2 #f)
|
||||||
;;> (1 2 #f)
|
;;> (1 2 #f)
|
||||||
[(&optional &opt &opts)
|
[(&optional &optionals &opt &opts)
|
||||||
(if state
|
(if state
|
||||||
(raise-syntax-error
|
(raise-syntax-error
|
||||||
#f "misplaced &optional argument" stx #'formals)
|
#f "misplaced &optional argument" stx #'formals)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user