repair "mark" list extraction

2015-04-12 07:34:17 -06:00 · 2015-04-12 07:34:17 -06:00 · dfcbf87704
commit dfcbf87704
parent 8ea555aaee
1 changed files with 1 additions and 1 deletions
--- 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)))