diff options
| author | Pierre-Marie Pédrot | 2017-07-25 12:27:31 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2017-07-25 14:45:09 +0200 |
| commit | 5748cd3a913eec7a24600715fc9b71044a7c38b1 (patch) | |
| tree | 0fbb156abb33275e86a53cdb1e4474a7d8415fd8 /src/tac2expr.mli | |
| parent | 41cea8603b35a1af405650d8a2b9aaa89a445367 (diff) | |
Generalizing patterns in fun bindings.
Diffstat (limited to 'src/tac2expr.mli')
| -rw-r--r-- | src/tac2expr.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tac2expr.mli b/src/tac2expr.mli index acdad9bab4..a9f2109cb2 100644 --- a/src/tac2expr.mli +++ b/src/tac2expr.mli @@ -83,7 +83,7 @@ type raw_patexpr = type raw_tacexpr = | CTacAtm of atom located | CTacRef of tacref or_relid -| CTacFun of Loc.t * (Name.t located * raw_typexpr option) list * raw_tacexpr +| CTacFun of Loc.t * (raw_patexpr * raw_typexpr option) list * raw_tacexpr | CTacApp of Loc.t * raw_tacexpr * raw_tacexpr list | CTacLet of Loc.t * rec_flag * (Name.t located * raw_typexpr option * raw_tacexpr) list * raw_tacexpr | CTacTup of raw_tacexpr list located |