Fixed typo
This commit is contained in:
parent
af0b1a908f
commit
410ee11cbe
|
@ -27,7 +27,7 @@
|
||||||
(syntax-parse (cur-expand syn)
|
(syntax-parse (cur-expand syn)
|
||||||
;; TODO: Need to add these to a literal set and export it
|
;; TODO: Need to add these to a literal set and export it
|
||||||
;; Or, maybe redefine syntax-parse
|
;; Or, maybe redefine syntax-parse
|
||||||
#:dataumliterals (:)
|
#:dataum-literals (:)
|
||||||
#:literals (lambda forall data real-app case Type)
|
#:literals (lambda forall data real-app case Type)
|
||||||
[(_ Type)
|
[(_ Type)
|
||||||
#'(lambda* (x1 : Type) (x2 : Type) (->* x1 x2 Type))]
|
#'(lambda* (x1 : Type) (x2 : Type) (->* x1 x2 Type))]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user