diff --git a/sugar/test/debug-meta-lang.rkt b/sugar/test/debug-meta-lang.rkt index 951aa5d..ecc3d82 100644 --- a/sugar/test/debug-meta-lang.rkt +++ b/sugar/test/debug-meta-lang.rkt @@ -6,10 +6,10 @@ [only-in "completely unexpected!"] [report "well, not really"]) (parameterize ([current-error-port out]) - ^5) + #^5) (check-equal? (get-output-string out) "5 = 5\n")) (let ([out (open-output-string)] [report/line "outta the blue!"]) (parameterize ([current-error-port out]) - ^^5) + #^^5) (check-equal? (get-output-string out) "5 = 5 on line 14\n"))