macro-debugger: fixed module & local-expansion bug
svn: r17666 original commit: 9a2408f2674d138657b256ad110a5c1987634b4a
This commit is contained in:
parent
34c1af4bd5
commit
9fb6db9c14
|
@ -67,8 +67,9 @@
|
||||||
[(Wrap p:module (e1 e2 rs ?1 locals tag rename check tag2 ?3 body shift))
|
[(Wrap p:module (e1 e2 rs ?1 locals tag rename check tag2 ?3 body shift))
|
||||||
(R [#:hide-check rs]
|
(R [#:hide-check rs]
|
||||||
[! ?1]
|
[! ?1]
|
||||||
|
[#:pattern ?form]
|
||||||
|
[LocalActions ?form locals]
|
||||||
[#:pattern (?module ?name ?language . ?body-parts)]
|
[#:pattern (?module ?name ?language . ?body-parts)]
|
||||||
[LocalActions ?body-parts locals]
|
|
||||||
[#:when tag
|
[#:when tag
|
||||||
[#:in-hole ?body-parts
|
[#:in-hole ?body-parts
|
||||||
[#:walk (list tag) 'tag-module-begin]]]
|
[#:walk (list tag) 'tag-module-begin]]]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user