fix 'defform*' #:id without #:literals (PR 10103); should merge to 4.1.5
svn: r14124 original commit: 14e4172c552ef96b3ec9dc60757c3e98f3d458cb
This commit is contained in:
parent
36a92072fd
commit
90c669ce1b
|
@ -106,6 +106,9 @@
|
||||||
[(_ #:literals lits [spec ...] desc ...)
|
[(_ #:literals lits [spec ...] desc ...)
|
||||||
(syntax/loc stx
|
(syntax/loc stx
|
||||||
(defform*/subs #:literals lits [spec ...] () desc ...))]
|
(defform*/subs #:literals lits [spec ...] () desc ...))]
|
||||||
|
[(_ #:id id [spec ...] desc ...)
|
||||||
|
(syntax/loc stx
|
||||||
|
(defform*/subs #:id id [spec ...] () desc ...))]
|
||||||
[(_ [spec ...] desc ...)
|
[(_ [spec ...] desc ...)
|
||||||
(syntax/loc stx
|
(syntax/loc stx
|
||||||
(defform*/subs [spec ...] () desc ...))]))
|
(defform*/subs [spec ...] () desc ...))]))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user