undefalias

src/test/cases/ListEatingTestCase.kiss

@@ -23,6 +23,7 @@
                 (Assert.equals 4 b))
             (otherwise
                 (Assert.fail)))
+
         (case l
             ([::...rest last]
                 (Assert.equals (.toString [1 2 3]) (.toString rest))

src/test/cases/MacroTestCase.hx

@@ -23,4 +23,9 @@ class MacroTestCase extends Test {
     function testModularMacros() {
         Assert.equals("Nat 5", nameAndNumber("Nat", 5));
     }
+
+    function testUndefAlias() {
+        Assert.equals(9, print);
+        Assert.equals(9, aliasValue());
+    }
 }

src/test/cases/MacroTestCase.kiss

@@ -35,3 +35,12 @@
 
 (altDefun nameAndNumber [name String number Int]
     "$name $number")
+
+// If for whatever reason, you wanted to make a variable called print
+(undefalias &call print)
+(defvar print 9)
+
+(defalias &ident alias 5)
+(undefalias &ident alias)
+(defvar alias 9)
+(defun aliasValue [] alias)