diff options
| author | Bruce Hill <bitbucket@bruce-hill.com> | 2018-06-20 15:22:03 -0700 |
|---|---|---|
| committer | Bruce Hill <bitbucket@bruce-hill.com> | 2018-06-20 15:22:06 -0700 |
| commit | d73cbf0aa5c9081d965e06822f4958aa5c1871e6 (patch) | |
| tree | 776740bfa4b47bd7983efd3d332da3c14b97bb49 /core/metaprogramming.nom | |
| parent | c1cec2ac8487bf7486b1ab85d24252d6658b3dfc (diff) | |
Cleanups.
Diffstat (limited to 'core/metaprogramming.nom')
| -rw-r--r-- | core/metaprogramming.nom | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/core/metaprogramming.nom b/core/metaprogramming.nom index 8911b59..1e167d0 100644 --- a/core/metaprogramming.nom +++ b/core/metaprogramming.nom @@ -4,7 +4,7 @@ lua> ".." nomsu.COMPILE_ACTIONS["% -> %"] = function(nomsu, tree, \%args, \%body) - local lua = LuaCode(tree.source, "function(") + local lua = LuaCode.Value(tree.source, "function(") if AST.is_syntax_tree(\%args, "Action") then \%args = \%args:get_args() end local lua_args = table.map(\%args, function(a) return AST.is_syntax_tree(a) and tostring(nomsu:compile(a)) or a end) lua:concat_append(lua_args, ", ") @@ -163,7 +163,7 @@ compile [declare locals %locals in %code] to compile [remove free vars %vars from %code] to Lua "\(%code as lua expr):remove_free_vars(\(%vars as lua expr));" -parse [%lua <-write %code, to %lua write %code] as: lua> "\%lua:append(\%code);" +compile [%lua <-write %code, to %lua write %code] to: Lua "\(%lua as lua expr):append(\(%code as lua expr));" compile [quote %s] to Lua value ".." |
