@@ -1,22 +1,22 @@ def reverse(lst, acc) { case(lst) - when( {car:a, cdr: d} ) { reverse(d, {car:a, cdr:acc}) } - when( {} ) { acc } + when {car:a, cdr: d}: reverse(d, {car:a, cdr:acc}) + when {}: acc }; @macro reverseArgs(e) {@value( var ev = @macro(e); case(ev) - when( {is:"App", fun:f, args:a} ) - { + when {is:"App", fun:f, args:a}: + ( ev {args: reverse(a, {})} - } - when( _ ) - { + ) + when _ : + ( ev - } + ) )}; def main() {