display datums not syntax
This commit is contained in:
parent
3fc02e6895
commit
2b1f86fe41
|
@ -67,7 +67,7 @@
|
||||||
e
|
e
|
||||||
(or (syntax-source-file-name e)
|
(or (syntax-source-file-name e)
|
||||||
(syntax-source e)
|
(syntax-source e)
|
||||||
e)))
|
(syntax->datum e))))
|
||||||
(annotate-top
|
(annotate-top
|
||||||
(if (syntax? e) (expand e) (datum->syntax #f e))
|
(if (syntax? e) (expand e) (datum->syntax #f e))
|
||||||
phase)]
|
phase)]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user