From 2b70c4eb6f4730182c7402ae5d444dadd65a352c Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Sat, 27 Jan 2007 19:18:28 +0000 Subject: [PATCH] Macro stepper: fixed another foci type bug svn: r5477 original commit: 043c5e3d8cfd15ad62fd33342b1aeb24141cfb5f --- collects/macro-debugger/model/reductions-engine.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/macro-debugger/model/reductions-engine.ss b/collects/macro-debugger/model/reductions-engine.ss index d5b2f2a..b15cf5d 100644 --- a/collects/macro-debugger/model/reductions-engine.ss +++ b/collects/macro-debugger/model/reductions-engine.ss @@ -188,7 +188,7 @@ ;; stumble : syntax exception -> Reduction (define (stumble stx exn) (make-misstep (current-derivation) (big-context) 'error (context) - stx stx exn)) + (foci stx) stx exn)) ;; stumble/E : syntax(s) syntax exn -> Reduction (define (stumble/E focus Ee1 exn)