aboutsummaryrefslogtreecommitdiff
path: root/core/metaprogramming.nom
diff options
context:
space:
mode:
authorBruce Hill <bruce@bruce-hill.com>2018-09-26 13:05:28 -0700
committerBruce Hill <bruce@bruce-hill.com>2018-09-26 13:05:47 -0700
commitb43432e647fbb3bb76aa2836e3899d5e407c50f9 (patch)
tree640aee09e7dafbcca53c4792d3446c7f6265e004 /core/metaprogramming.nom
parent692fae5416ce1f2702b599ffb27b2e3d2235eba7 (diff)
Fixed all syntax errors, got original (non-nomnom) tests passing.
Diffstat (limited to 'core/metaprogramming.nom')
-rw-r--r--core/metaprogramming.nom6
1 files changed, 3 insertions, 3 deletions
diff --git a/core/metaprogramming.nom b/core/metaprogramming.nom
index 8b75ccd..f92fb0c 100644
--- a/core/metaprogramming.nom
+++ b/core/metaprogramming.nom
@@ -236,7 +236,7 @@ action [%var as lua identifier, %var as lua id] (..)
elseif AST.is_syntax_tree(\%var) then
local lua = \(%var as lua expr)
if not tostring(lua):match("^[_a-zA-Z][_a-zA-Z0-9]*$") then
- compile_error_at_1_2(\%var, "This is not a valid Lua identifier.")
+ nomsu:compile_error(\%var, "This is not a valid Lua identifier.")
end
return lua
else error("Unknown type: "..tostring(\%var))
@@ -322,7 +322,7 @@ test:
compile [quote %s] to (Lua value "tostring(\(%s as lua expr)):as_lua()")
test:
- assume (lua type of {}) == "Lua table"
+ assume (lua type of {}) == "table"
assume (type of {}) == "Dict"
assume ({} is a "Dict")
assume ("" is text)
@@ -341,7 +341,7 @@ action [type of %]:
else return lua_type end"
parse [% is a %type, % is an %type] as ((type of %) == %type)
parse [% isn't a %type, % isn't an %type, % is not a %type, % is not an %type]
-..as ((type of %) == %type)
+..as ((type of %) != %type)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~