Differences From Artifact [a9061a338889d74c]:
- File
sample/ast.pmy
- 2010-11-24 11:45:25 - part of checkin [adacc96a55] on branch trunk - changed the syntax of pattern matching (user: kinaba) [annotate]
To Artifact [7e23af883e94d990]:
- File
sample/ast.pmy
- 2010-11-24 13:22:04 - part of checkin [f9c31f3cd8] on branch trunk - Fixed the null dereference bug when directly wrote "case 1 when 2: 3" in REPL. It was due to null LexPosition in the AST. Now AST.pos !is null is an invariant of AST. (user: kinaba) [annotate]
7 7
8 @macro reverseArgs(e) {@value( 8 @macro reverseArgs(e) {@value(
9 var ev = @macro(e); 9 var ev = @macro(e);
10 case(ev) 10 case(ev)
11 when {is:"App", fun:f, args:a}: 11 when {is:"App", fun:f, args:a}:
12 ( 12 (
13 ev {args: reverse(a, {})} 13 ev {args: reverse(a, {})}
> 14 # {is:"App", fun:f, args:reverse(a, {})}
14 ) 15 )
15 when _ : 16 when _ :
16 ( 17 (
17 ev 18 ev
18 ) 19 )
19 )}; 20 )};
20 21