Fixed incompatibility with recent versions
This commit is contained in:
parent
69ec8b1248
commit
1077eadde3
|
@ -21,7 +21,7 @@
|
||||||
(if (syntax? x) (syntax-e x) x))
|
(if (syntax? x) (syntax-e x) x))
|
||||||
|
|
||||||
(define-syntax (delay/pure/stateless/unsafe stx)
|
(define-syntax (delay/pure/stateless/unsafe stx)
|
||||||
(make-delayer stx #'make-promise/pure/stateless '()))
|
(delayer (#'make-promise/pure/stateless '()) stx))
|
||||||
|
|
||||||
(define-syntax delay/pure/stateful
|
(define-syntax delay/pure/stateful
|
||||||
(syntax-parser
|
(syntax-parser
|
||||||
|
|
Loading…
Reference in New Issue
Block a user