From 8a35993125ed210e841fb312cf7b5e93128184e6 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 15 Sep 2005 17:50:32 +0000 Subject: [PATCH] use code inspector svn: r858 --- collects/errortrace/stacktrace.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/errortrace/stacktrace.ss b/collects/errortrace/stacktrace.ss index 14ead1bea0..cb80920dc3 100644 --- a/collects/errortrace/stacktrace.ss +++ b/collects/errortrace/stacktrace.ss @@ -258,7 +258,7 @@ bodys)]) (rebuild expr (map cons bodys bodyl)))) - (define orig-inspector (current-inspector)) + (define orig-inspector (current-code-inspector)) (define (certify orig new) (syntax-recertify new orig orig-inspector #f))