From ae01dea33645f9da4fe61b54e6801ce655ca14b3 Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Tue, 30 Jun 2009 22:41:05 +0000 Subject: [PATCH] macro stepper: fixed opaque variable ref bug svn: r15348 --- collects/macro-debugger/model/reductions.ss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/macro-debugger/model/reductions.ss b/collects/macro-debugger/model/reductions.ss index 8062e26150..82affc7c40 100644 --- a/collects/macro-debugger/model/reductions.ss +++ b/collects/macro-debugger/model/reductions.ss @@ -60,7 +60,8 @@ ;; Primitives [(Wrap p:variable (e1 e2 rs ?1)) (R [#:learn (list e2)] - [#:when (not (bound-identifier=? e1 e2)) + [#:when (or (not (identifier? e1)) + (not (bound-identifier=? e1 e2))) [#:walk e2 'resolve-variable]])] [(Wrap p:module (e1 e2 rs ?1 ?2 tag rename check tag2 ?3 body shift)) (R [#:hide-check rs]