2018-05-10 22:50:45 -07:00
|
|
|
use "core"
|
|
|
|
|
|
2018-06-14 23:25:05 -07:00
|
|
|
%x <- "outer"
|
|
|
|
|
with local %x
|
|
|
|
|
%x <- "inner"
|
|
|
|
|
assume: %x = "inner"
|
|
|
|
|
assume: %x = "outer"
|
2018-05-10 22:50:45 -07:00
|
|
|
|
2018-06-14 23:25:05 -07:00
|
|
|
action [foo] "outer foo"
|
|
|
|
|
with local (foo)
|
|
|
|
|
action [foo] "inner foo"
|
|
|
|
|
assume: (foo) = "inner foo"
|
|
|
|
|
assume: (foo) = "outer foo"
|
2018-05-10 22:50:45 -07:00
|
|
|
|
|
|
|
|
|
|
|
|
|
say "Scopes test passed."
|
