display datums not syntax

This commit is contained in:
Spencer Florence 2015-01-07 00:21:40 -05:00
parent 3fc02e6895
commit 2b1f86fe41

View File

@ -67,7 +67,7 @@
e
(or (syntax-source-file-name e)
(syntax-source e)
e)))
(syntax->datum e))))
(annotate-top
(if (syntax? e) (expand e) (datum->syntax #f e))
phase)]