Fix Eiterator signature (use op_desc)

This commit is contained in:
Cédric Pasteur 2010-06-18 09:50:49 +02:00
parent 0040bd0bec
commit b5fbfad315
1 changed files with 5 additions and 1 deletions

View File

@ -65,7 +65,11 @@ and array_op =
| Eupdate of size_exp list * exp * exp (*indices, array, value*)
| Eselect_slice of size_exp * size_exp * exp (*lower bound, upper bound, array*)
| Econcat of exp * exp
| Eiterator of iterator_type * longname * size_exp list * size_exp * exp list * ident option
| Eiterator of iterator_type * op_desc * size_exp * exp list * ident option
(** [op_desc] is the function iterated,
[size_exp] is the size of the iteration,
[exp list] is the passed arguments,
[ident option] is the optional reset condition *)
and op_desc = { op_name: longname; op_params: size_exp list; op_kind: op_kind }
and op_kind = | Eop | Enode