Removed e from fold-pat attributes.
This commit is contained in:
parent
def3834aa2
commit
58d84d79db
|
@ -80,7 +80,7 @@
|
||||||
;; pattern for the match as
|
;; pattern for the match as
|
||||||
(define-syntax-class (fold-pat fold-name)
|
(define-syntax-class (fold-pat fold-name)
|
||||||
#:transparent
|
#:transparent
|
||||||
#:attributes (e proc)
|
#:attributes (proc)
|
||||||
(pattern #:base
|
(pattern #:base
|
||||||
#:with proc #`(procedure-rename
|
#:with proc #`(procedure-rename
|
||||||
(lambda () #,fold-target)
|
(lambda () #,fold-target)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user