diff options
| author | Benjamin Gregoire | 2015-03-26 14:24:54 +0100 |
|---|---|---|
| committer | Benjamin Gregoire | 2015-03-26 15:43:41 +0100 |
| commit | 5c6a50d6ec1d04bacd3e41ffbb88453fef92cd5d (patch) | |
| tree | e6ad09fca44ec6c848448c1d6be261897eecbf75 /kernel/vm.mli | |
| parent | c9074aa238e73bb932be67c67479b11bc95cd47a (diff) | |
Fix bug 4157,
change the representation of inductive constructor
when there is too many non constant constructors in the inductive type
Conflicts:
kernel/cbytegen.ml
Diffstat (limited to 'kernel/vm.mli')
| -rw-r--r-- | kernel/vm.mli | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/vm.mli b/kernel/vm.mli index 295ea83c49..139202f090 100644 --- a/kernel/vm.mli +++ b/kernel/vm.mli @@ -46,7 +46,7 @@ type whd = | Vfix of vfix * arguments option | Vcofix of vcofix * to_up * arguments option | Vconstr_const of int - | Vconstr_block of vblock + | Vconstr_block of int * vblock | Vatom_stk of atom * stack (** Constructors *) @@ -94,7 +94,6 @@ val reduce_cofix : int -> vcofix -> values array * values array (** Block *) -val btag : vblock -> int val bsize : vblock -> int val bfield : vblock -> int -> values |