From ff826b17e37bdaf2984221e18a415ac7376917b7 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Fri, 22 May 2009 00:39:13 +0000 Subject: [PATCH] macro-debugger: disable lift errors Do not apply to release branch. svn: r14914 original commit: bf001f811de9389e5c485a953d6134847bcf7258 --- collects/macro-debugger/model/reductions.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/macro-debugger/model/reductions.ss b/collects/macro-debugger/model/reductions.ss index 037d68e..8062e26 100644 --- 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