%compare-strncmp %readonly-tables %struct-type %{ #include "joy.h" #include "definitions.h" %} struct dict_entry; %% "=", def_eq ">", def_gt "<", def_lt "!=", def_neq "<>", def_neq "<=", def_le ">=", def_ge "&", def_and "|", def_or "%", tdiv_r mod, tdiv_r *, mul mul, mul +, add add, add -, sub sub, sub /, tdiv_q div, tdiv_q bool, truthy branch, branch clear, clear cmp, cmp_joyfunc cons, cons concat, concat dip, dip dup, dup first, first i, i_joyfunc inscribe, inscribe loop, loop pop, pop rest, rest stack, stack swaack, swaack swap, swap