From 53a9d4eae888d2b09c68fcd5dc14ae51f5d07c31 Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Wed, 10 Jan 2018 20:45:03 -0800 Subject: Pretty much mostly working. --- lib/utils2.nom | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lib/utils2.nom') diff --git a/lib/utils2.nom b/lib/utils2.nom index 2fa29f7..8077203 100644 --- a/lib/utils2.nom +++ b/lib/utils2.nom @@ -11,7 +11,7 @@ compile [say %str] to: compile [do %action] to code: (%action as lua statements) if ((%action's "type") == "Thunk") - ..else "(\(%action as lua))(nomsu, vars);" + ..else "(\(%action as lua))(nomsu);" # With statement compile [with %assignments %action] to code: @@ -33,10 +33,10 @@ compile [with %assignments %action] to code: do \%setup local fell_through = false; - local ok, ret1, ret2 = pcall(function(nomsu, vars) + local ok, ret1, ret2 = pcall(function(nomsu) \(%action as lua statements); fell_through = true; - end, nomsu, vars); + end, nomsu); \(join ("\((%->"var") as lua) = old_value\(%->"i");" for all %data) with glue "\n ") if not ok then nomsu:error(ret1); end if not fell_through then -- cgit v1.2.3