diff --git a/collects/tests/drscheme/repl-test.ss b/collects/tests/drscheme/repl-test.ss index 4a6f5e0b54..f08844e992 100644 --- a/collects/tests/drscheme/repl-test.ss +++ b/collects/tests/drscheme/repl-test.ss @@ -59,7 +59,9 @@ This produces an ACK message (define syntax-regexp-prefix (string-append - (regexp-quote "#\"})")))]) (mktest "(write (list (syntax x)))" - ("({embedded \".#\"})" - "({embedded \".#\"})" - "({embedded \".#\"})" - "({embedded \".#\"})" - "({embedded \".#\"})" - "({embedded \".#\"})") + (#rx"({embedded \".#\"})" + #rx"({embedded \".#\"})" + #rx"({embedded \".#\"})" + #rx"({embedded \".#\"})" + #rx"({embedded \".#\"})" + #rx"({embedded \".#\"})") 'interactions #f void @@ -691,12 +693,12 @@ This produces an ACK message (mktest "(parameterize ([current-output-port (open-output-string)]) (fprintf (current-error-port) \"~e\" #'foot))" - ("#" - "#" - "#" - "#" - "#" - "#") + (#rx"#" + #rx"#" + #rx"#" + #rx"#" + #rx"#" + #rx"#") 'interactions #f void