svn: r6761
This commit is contained in:
Eli Barzilay 2007-06-29 05:17:35 +00:00
parent 6f0471f6ec
commit 4016be1637

View File

@ -239,7 +239,7 @@
[stx* (syntax/placeholder-strip stx)])
(if (and (< curline line) (< mincol stxcol))
(list* stx*
(datum->syntax-object/placeholder stx*
(datum->syntax-object/placeholder stx
(make-spaces (- stxcol mincol)))
r)
(cons stx* r))))))))]))