From 04d7edefa372f80160603ddd9039a7120527e4bc Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Sun, 22 Jul 2018 16:13:33 -0700 Subject: Adding more inline tests. --- core/scopes.nom | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'core/scopes.nom') diff --git a/core/scopes.nom b/core/scopes.nom index a65b030..b725660 100644 --- a/core/scopes.nom +++ b/core/scopes.nom @@ -7,6 +7,20 @@ use "core/operators.nom" use "core/collections.nom" use "core/control_flow.nom" +test: + %x = "outer" + with local %x: + %x = "inner" + assume (%x == "inner") + + assume (%x == "outer") + action [foo] "outer foo" + with local [action (foo)]: + action [foo] "inner foo" + assume ((foo) == "inner foo") + + assume ((foo) == "outer foo") + compile [with local %locals %body, with local %locals do %body] to: %body_lua = (%body as lua statements) if %locals.type is: -- cgit v1.2.3