Allow macros to define more than one field
This commit is contained in:
17
src/test/cases/MacroTestCase.hx
Normal file
17
src/test/cases/MacroTestCase.hx
Normal file
@@ -0,0 +1,17 @@
|
||||
package test.cases;
|
||||
|
||||
import utest.Test;
|
||||
import utest.Assert;
|
||||
import kiss.Prelude;
|
||||
import kiss.List;
|
||||
import haxe.ds.Option;
|
||||
|
||||
using StringTools;
|
||||
|
||||
@:build(kiss.Kiss.build("kiss/src/test/cases/MacroTestCase.kiss"))
|
||||
class MacroTestCase extends Test {
|
||||
function testMultipleFieldForms() {
|
||||
Assert.equals(5, myVar);
|
||||
Assert.equals(6, myFunc());
|
||||
}
|
||||
}
|
6
src/test/cases/MacroTestCase.kiss
Normal file
6
src/test/cases/MacroTestCase.kiss
Normal file
@@ -0,0 +1,6 @@
|
||||
(defmacro defMultiple [varName funcName]
|
||||
`{
|
||||
(defvar ,varName 5)
|
||||
(defun ,funcName [] 6)})
|
||||
|
||||
(defMultiple myVar myFunc)
|
Reference in New Issue
Block a user