commit df346e3044f05955e83dadc9c1eb438f2798ee91
parent 93cc4c0ea767296df284804ef8e9052e9aa9f6b0
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date: Fri, 26 Jan 2007 19:52:05 +0000
Macro stepper: fixed old error message for clarity
svn: r5467
original commit: c7b622c537c78f2519e1919558f379b82f45f492
Diffstat:
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/collects/macro-debugger/syntax-browser/pretty-printer.ss b/collects/macro-debugger/syntax-browser/pretty-printer.ss
@@ -21,10 +21,10 @@
(init-field typesetter)
(init-field (primary-partition #f))
(init-field (columns (current-default-columns)))
-
+
(unless (syntax? main-stx)
- (error 'syntax-snip% "got non-syntax object: ~s" main-stx))
-
+ (error 'syntax-pretty-printer "got non-syntax object: ~s" main-stx))
+
(define datum #f)
(define ht:flat=>stx #f)
(define ht:stx=>flat #f)