diff --git a/debug/test/debug-repl-macros.rkt b/debug/test/debug-repl-macros.rkt index ca6250c..0f0eb3e 100644 --- a/debug/test/debug-repl-macros.rkt +++ b/debug/test/debug-repl-macros.rkt @@ -23,7 +23,10 @@ #,(?list-helper #'[acc ... tmp] #'[y ...]) #false))])) (?list-helper #'[] #'[x ...])] - [stx (raise-syntax-error #f "bad syntax" #'stx)])) + [stx + ;; TODO: figure out how to make syntax-parse's own errors + ;; not cause infinite loops + (raise-syntax-error #f "bad syntax" #'stx)])) (debug-repl) tmp)