Added remove rule rule.

2017-11-01 19:59:44 -07:00 · 2017-11-01 19:59:44 -07:00 · 87b2cce8e5
commit 87b2cce8e5
parent fb3936269f
1 changed files with 7 additions and 0 deletions
--- a/lib/metaprogramming.nom
+++ b/lib/metaprogramming.nom
@ -53,6 +53,13 @@ rule [escaped compile %macro_def to code %body] =:
 parse [compile %macro_def to %body] as: escaped compile \%macro_def to \%body
 parse [compile %macro_def to code %body] as: escaped compile \%macro_def to code \%body

+rule [remove rule %stub] =:
+    lua> ".."
+        |local def = nomsu.defs[stub];
+        |for _, alias in ipairs(def.aliases) do
+        |    nomsu.defs[alias] = nil;
+        |end
+
 rule [do %] =:
    =lua "\(%)(nomsu, vars)"