commit dfcbf8770432b42c9247aced5bb401418c2380b0 parent 8ea555aaee7cb358be6556e29765b02a7bc13972 Author: Matthew Flatt <mflatt@racket-lang.org> Date: Sun, 12 Apr 2015 07:34:17 -0600 repair "mark" list extraction Diffstat:
| M | macro-debugger-text-lib/macro-debugger/util/stxobj.rkt | | | 2 | +- |
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/macro-debugger-text-lib/macro-debugger/util/stxobj.rkt b/macro-debugger-text-lib/macro-debugger/util/stxobj.rkt @@ -4,5 +4,5 @@ (define (get-marks stx) (define info (syntax-debug-info stx)) - (for ([e (in-list (hash-ref info 'context))]) + (for/list ([e (in-list (hash-ref info 'context))]) (vector-ref e 0)))