macro-debugger: disable lift errors

Do not apply to release branch. svn: r14914 original commit: bf001f811de9389e5c485a953d6134847bcf7258
2009-05-22 00:39:13 +00:00 · 2009-05-22 00:39:13 +00:00 · ff826b17e3
commit ff826b17e3
parent 9c8ec0d603
1 changed files with 1 additions and 1 deletions
--- a/collects/macro-debugger/model/reductions.ss
+++ b/collects/macro-debugger/model/reductions.ss
@ -612,7 +612,7 @@
 ;; lift-error
 (define (lift-error sym . args)
  (apply fprintf (current-error-port) args)
-  (when #t
+  (when #f
    (apply error sym args)))

 ;; opaque-table