Bruce/nomsu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Tweaks.

Browse Source
This commit is contained in:
Bruce Hill 2017-12-15 15:30:05 -08:00
parent 340714635a
commit 3c303018bb
3 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lib/metaprogramming.nom
View File

@ -72,6 +72,10 @@ rule [%tree as value] =:
=lua "nomsu:tree_to_value(\(%tree), vars)" =lua "nomsu:tree_to_value(\(%tree), vars)"
compile [repr %obj] to: compile [repr %obj] to:
"nomsu:repr(\(%obj as lua))" "nomsu:repr(\(%obj as lua))"
compile [indented %obj] to:
"nomsu:indent(\(%obj as lua))"
compile [dedented %obj] to:
"nomsu:dedent(\(%obj as lua))"
compile [type %obj, type of %obj] to: compile [type %obj, type of %obj] to:
"type(\(%obj as lua))" "type(\(%obj as lua))"

3
nomsu.lua
View File

@ -353,8 +353,9 @@ do
scope = nil scope = nil
end end
if after == nil then if after == nil then
after = 0 after = nil
end end
after = after or (self.core_defs or 0)
scope = scope or self.defs scope = scope or self.defs
local defs_by_num = { } local defs_by_num = { }
for stub, def in pairs(scope) do for stub, def in pairs(scope) do

3
nomsu.moon
View File

@ -277,7 +277,8 @@ class NomsuCompiler
if not ok then @error(ret1) if not ok then @error(ret1)
return ret1, ret2 return ret1, ret2
serialize_defs: (scope=nil, after=0)=> serialize_defs: (scope=nil, after=nil)=>
after or= @core_defs or 0
scope or= @defs scope or= @defs
defs_by_num = {} defs_by_num = {}
for stub, def in pairs(scope) for stub, def in pairs(scope)