macro stepper: fixed opaque variable ref bug
svn: r15348 original commit: ae01dea33645f9da4fe61b54e6801ce655ca14b3
This commit is contained in:
commit
94a1f98298
|
@ -60,7 +60,8 @@
|
||||||
;; Primitives
|
;; Primitives
|
||||||
[(Wrap p:variable (e1 e2 rs ?1))
|
[(Wrap p:variable (e1 e2 rs ?1))
|
||||||
(R [#:learn (list e2)]
|
(R [#:learn (list e2)]
|
||||||
[#:when (not (bound-identifier=? e1 e2))
|
[#:when (or (not (identifier? e1))
|
||||||
|
(not (bound-identifier=? e1 e2)))
|
||||||
[#:walk e2 'resolve-variable]])]
|
[#:walk e2 'resolve-variable]])]
|
||||||
[(Wrap p:module (e1 e2 rs ?1 ?2 tag rename check tag2 ?3 body shift))
|
[(Wrap p:module (e1 e2 rs ?1 ?2 tag rename check tag2 ?3 body shift))
|
||||||
(R [#:hide-check rs]
|
(R [#:hide-check rs]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user