Commit 2330bbc25788b2253a626f85c741b083b8071f9d
1 parent
7a9d1324
Exists in
master
build increment
Showing
3 changed files
with
18 additions
and
13 deletions
Show diff stats
fzn-parser/examples/aust.ast.old
| @@ -7,7 +7,7 @@ _T > [[]|_T]. | @@ -7,7 +7,7 @@ _T > [[]|_T]. | ||
| 7 | _T > [int:lit(1)|_T]. | 7 | _T > [int:lit(1)|_T]. |
| 8 | _T > [int:lit(-1)|_T]. | 8 | _T > [int:lit(-1)|_T]. |
| 9 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 9 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 10 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 10 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 11 | [H,T|_T] > [[H|T]|_T]. | 11 | [H,T|_T] > [[H|T]|_T]. |
| 12 | _T > [int(1,3)|_T]. | 12 | _T > [int(1,3)|_T]. |
| 13 | _T > [_:id('output_var')|_T]. | 13 | _T > [_:id('output_var')|_T]. |
| @@ -50,7 +50,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -50,7 +50,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 50 | _T > [_:id('wa')|_T]. | 50 | _T > [_:id('wa')|_T]. |
| 51 | _T > [_:id('nt')|_T]. | 51 | _T > [_:id('nt')|_T]. |
| 52 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 52 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 53 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 53 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 54 | _T > [int:lit(0)|_T]. | 54 | _T > [int:lit(0)|_T]. |
| 55 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 55 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 56 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 56 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -61,7 +61,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -61,7 +61,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 61 | _T > [_:id('wa')|_T]. | 61 | _T > [_:id('wa')|_T]. |
| 62 | _T > [_:id('sa')|_T]. | 62 | _T > [_:id('sa')|_T]. |
| 63 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 63 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 64 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 64 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 65 | _T > [int:lit(0)|_T]. | 65 | _T > [int:lit(0)|_T]. |
| 66 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 66 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 67 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 67 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -72,7 +72,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -72,7 +72,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 72 | _T > [_:id('nt')|_T]. | 72 | _T > [_:id('nt')|_T]. |
| 73 | _T > [_:id('sa')|_T]. | 73 | _T > [_:id('sa')|_T]. |
| 74 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 74 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 75 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 75 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 76 | _T > [int:lit(0)|_T]. | 76 | _T > [int:lit(0)|_T]. |
| 77 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 77 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 78 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 78 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -83,7 +83,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -83,7 +83,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 83 | _T > [_:id('nt')|_T]. | 83 | _T > [_:id('nt')|_T]. |
| 84 | _T > [_:id('q')|_T]. | 84 | _T > [_:id('q')|_T]. |
| 85 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 85 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 86 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 86 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 87 | _T > [int:lit(0)|_T]. | 87 | _T > [int:lit(0)|_T]. |
| 88 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 88 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 89 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 89 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -94,7 +94,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -94,7 +94,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 94 | _T > [_:id('sa')|_T]. | 94 | _T > [_:id('sa')|_T]. |
| 95 | _T > [_:id('q')|_T]. | 95 | _T > [_:id('q')|_T]. |
| 96 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 96 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 97 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 97 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 98 | _T > [int:lit(0)|_T]. | 98 | _T > [int:lit(0)|_T]. |
| 99 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 99 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 100 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 100 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -105,7 +105,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -105,7 +105,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 105 | _T > [_:id('sa')|_T]. | 105 | _T > [_:id('sa')|_T]. |
| 106 | _T > [_:id('nsw')|_T]. | 106 | _T > [_:id('nsw')|_T]. |
| 107 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 107 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 108 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 108 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 109 | _T > [int:lit(0)|_T]. | 109 | _T > [int:lit(0)|_T]. |
| 110 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 110 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 111 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 111 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -116,7 +116,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -116,7 +116,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 116 | _T > [_:id('sa')|_T]. | 116 | _T > [_:id('sa')|_T]. |
| 117 | _T > [_:id('v')|_T]. | 117 | _T > [_:id('v')|_T]. |
| 118 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 118 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 119 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 119 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 120 | _T > [int:lit(0)|_T]. | 120 | _T > [int:lit(0)|_T]. |
| 121 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 121 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 122 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 122 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -127,7 +127,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -127,7 +127,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 127 | _T > [_:id('q')|_T]. | 127 | _T > [_:id('q')|_T]. |
| 128 | _T > [_:id('nsw')|_T]. | 128 | _T > [_:id('nsw')|_T]. |
| 129 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 129 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 130 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 130 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 131 | _T > [int:lit(0)|_T]. | 131 | _T > [int:lit(0)|_T]. |
| 132 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 132 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 133 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 133 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| @@ -138,7 +138,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | @@ -138,7 +138,7 @@ _T > [_:id('X_INTRODUCED_0')|_T]. | ||
| 138 | _T > [_:id('nsw')|_T]. | 138 | _T > [_:id('nsw')|_T]. |
| 139 | _T > [_:id('v')|_T]. | 139 | _T > [_:id('v')|_T]. |
| 140 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 140 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 141 | -[Es|_T] > [array(_,[_]):alit(Es)|_T]. | 141 | +[Es|_T] > [array(_):alit(Es)|_T]. |
| 142 | _T > [int:lit(0)|_T]. | 142 | _T > [int:lit(0)|_T]. |
| 143 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 143 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
| 144 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. | 144 | [T2:E2,T1:E1|_T] > [(T1,T2):(E1,E2)|_T]. |
fzn-parser/flatzinc.y
| @@ -119,6 +119,7 @@ pred_decl_item: | @@ -119,6 +119,7 @@ pred_decl_item: | ||
| 119 | 119 | ||
| 120 | var_decl_item: | 120 | var_decl_item: |
| 121 | VAR non_array_ti_expr_tail ':' ident_anns var_decl_item2 | 121 | VAR non_array_ti_expr_tail ':' ident_anns var_decl_item2 |
| 122 | + { AST ("ID,T") | ||
| 122 | | non_array_ti_expr_tail ':' ident_anns '=' expr | 123 | | non_array_ti_expr_tail ':' ident_anns '=' expr |
| 123 | | ARRAY '[' INT_LITERAL DOTDOT INT_LITERAL ']' OF array_decl_tail | 124 | | ARRAY '[' INT_LITERAL DOTDOT INT_LITERAL ']' OF array_decl_tail |
| 124 | 125 | ||
| @@ -135,8 +136,8 @@ array_decl_tail2: | @@ -135,8 +136,8 @@ array_decl_tail2: | ||
| 135 | | /*empty*/ | 136 | | /*empty*/ |
| 136 | 137 | ||
| 137 | ident_anns: | 138 | ident_anns: |
| 138 | - IDENT annotations | ||
| 139 | - | UNDERSCORE_IDENT annotations | 139 | + IDENT { PUSH (("id('%s')", $1)); } annotations |
| 140 | + | UNDERSCORE_IDENT { PUSH (("id('%s')", $1)); } annotations | ||
| 140 | 141 | ||
| 141 | constraint_item: | 142 | constraint_item: |
| 142 | CONSTRAINT constraint_elem annotations | 143 | CONSTRAINT constraint_elem annotations |
fzn-parser/fznslurp.pl
| @@ -4,6 +4,10 @@ load_ast(AST) :- load_ast(_>[], [], AST). | @@ -4,6 +4,10 @@ load_ast(AST) :- load_ast(_>[], [], AST). | ||
| 4 | 4 | ||
| 5 | load_ast(end_of_file, AST, AST). | 5 | load_ast(end_of_file, AST, AST). |
| 6 | load_ast(IN > INT, IN, OUT) :- read(OP), !, | 6 | load_ast(IN > INT, IN, OUT) :- read(OP), !, |
| 7 | - write(OP), nl, | 7 | + ( g_read(ast_debug, true) -> |
| 8 | + write(OP), nl | ||
| 9 | + ; true ), | ||
| 8 | load_ast(OP, INT, OUT). | 10 | load_ast(OP, INT, OUT). |
| 9 | 11 | ||
| 12 | +slurp(FILE, AST) :- see(FILE), load_ast(AST), !, seen. | ||
| 13 | +slurp(_, end_of_file) :- seen. |