adding more stepper annotation

svn: r9467
This commit is contained in:
John Clements 2008-04-25 00:33:10 +00:00
parent 2d12ca4a62
commit 2116c4b0eb

View File

@ -68,7 +68,7 @@
(syntax-column stx) (syntax-column stx)
(syntax-position stx) (syntax-position stx)
(syntax-span stx))) (syntax-span stx)))
test-info))))) #,(stepper-syntax-property #`test-info `stepper-no-lifting-info #t))))))
`stepper-skipto `stepper-skipto
(append skipto/third ;; let (append skipto/third ;; let
skipto/third skipto/second ;; unless (it expands into a begin) skipto/third skipto/second ;; unless (it expands into a begin)