2018-11-20 17:42:39 -06:00
|
|
|
let noargmacro = macro() => {
|
|
|
|
field1 = "value",
|
|
|
|
};
|
|
|
|
|
2018-08-17 22:03:47 -05:00
|
|
|
let simplemacro = macro(arg1, arg2, arg3) => {
|
|
|
|
field1 = arg1,
|
|
|
|
field2 = arg2,
|
|
|
|
field3 = arg3,
|
|
|
|
};
|
|
|
|
|
|
|
|
let cplxmacro = macro(argint, argstr, argfloat) => {
|
|
|
|
field1 = argint + 1,
|
|
|
|
field2 = argstr + " are here",
|
|
|
|
field3 = argfloat - 1.0,
|
2018-08-22 18:58:48 -05:00
|
|
|
boolfield = argint == 1,
|
2018-08-17 22:03:47 -05:00
|
|
|
};
|
|
|
|
|
2018-11-20 17:42:39 -06:00
|
|
|
let noargresult = noargmacro();
|
2018-08-17 22:03:47 -05:00
|
|
|
let simpleresult = simplemacro(1, 2, 3);
|
|
|
|
let cplxresult = cplxmacro(1, "We", 3.0);
|
|
|
|
|
2019-01-08 20:32:16 -06:00
|
|
|
assert {
|
|
|
|
ok = noargresult.field1 == "value",
|
|
|
|
desc = "noargresult.field1 == \"value\"",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = simpleresult.field1 == 1,
|
|
|
|
desc = "simpleresult.field1 == 1",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = simpleresult.field2 == 2,
|
|
|
|
desc = "simpleresult.field2 == 2",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = simpleresult.field3 == 3,
|
|
|
|
desc = "simpleresult.field3 == 3",
|
|
|
|
};
|
|
|
|
|
|
|
|
assert {
|
|
|
|
ok = cplxresult.field1 == 2,
|
|
|
|
desc = "cplxresult.field1 == 2",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = cplxresult.field2 == "We are here",
|
|
|
|
desc = "cplxresult.field2 == \"We are here\"",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = cplxresult.field3 == 2.0,
|
|
|
|
desc = "cplxresult.field3 == 2.0",
|
|
|
|
};
|
|
|
|
assert {
|
|
|
|
ok = cplxresult.boolfield == true,
|
|
|
|
desc = "cplxresult.boolfield == true",
|
|
|
|
};
|
2019-01-08 17:22:46 -06:00
|
|
|
|
|
|
|
let macro_tpl_arg = macro(tpl) => {
|
|
|
|
result = tpl.field,
|
|
|
|
};
|
|
|
|
|
|
|
|
let arg_tpl = {
|
|
|
|
field = "value",
|
|
|
|
};
|
|
|
|
|
2019-01-08 20:32:16 -06:00
|
|
|
assert {
|
|
|
|
ok = macro_tpl_arg(arg_tpl).result == arg_tpl.field,
|
|
|
|
desc = "macro_tpl_arg(arg_tpl).result == arg_tpl.field",
|
|
|
|
};
|