diff options
Diffstat (limited to 'starts/meaning-vm/level-2/sugar.hpp')
| -rw-r--r-- | starts/meaning-vm/level-2/sugar.hpp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/starts/meaning-vm/level-2/sugar.hpp b/starts/meaning-vm/level-2/sugar.hpp index bff945b..5b3b150 100644 --- a/starts/meaning-vm/level-2/sugar.hpp +++ b/starts/meaning-vm/level-2/sugar.hpp @@ -32,8 +32,10 @@ usleep(delay); \ } \ ref self = name; (void)self; \ + ref result("nothing"); (void)result; \ _macro_call(_macro_for_each_parens, _macro_habit_set_posarg, _macro_habit_set_posarg _macro_comma_remove_parens(argnametoklist)); \ __VA_ARGS__ \ + if (result != ref("nothing")) { ctx.link(ref("result"), result); } }); #define _macro_habit_argnameref(name, tok) \ ref(#name) |