diff options
| author | Maxime Dénès | 2015-01-16 22:17:03 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2015-01-17 08:02:45 +0100 |
| commit | 9f5586d88880cbb98c92edfe9c33c76564f1a19c (patch) | |
| tree | 6de2a171eff5706b0e4ce9268554b84a922f12b3 /kernel/nativevalues.mli | |
| parent | 4985f0ff99278beb3b934f86edf1398659c611a8 (diff) | |
Make native compiler handle universe polymorphic definitions.
One remaining issue: aliased constants raise an anomaly when some unsubstituted
universe variables remain. VM may suffer from the same problem.
Diffstat (limited to 'kernel/nativevalues.mli')
| -rw-r--r-- | kernel/nativevalues.mli | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/kernel/nativevalues.mli b/kernel/nativevalues.mli index 983e7588d6..79e35d4a04 100644 --- a/kernel/nativevalues.mli +++ b/kernel/nativevalues.mli @@ -41,8 +41,8 @@ val eq_rec_pos : rec_pos -> rec_pos -> bool type atom = | Arel of int - | Aconstant of constant - | Aind of inductive + | Aconstant of pconstant + | Aind of pinductive | Asort of sorts | Avar of identifier | Acase of annot_sw * accumulator * t * (t -> t) @@ -59,9 +59,9 @@ type atom = val mk_accu : atom -> t val mk_rel_accu : int -> t val mk_rels_accu : int -> int -> t array -val mk_constant_accu : constant -> t -val mk_ind_accu : inductive -> t -val mk_sort_accu : sorts -> t +val mk_constant_accu : constant -> Univ.Level.t array -> t +val mk_ind_accu : inductive -> Univ.Level.t array -> t +val mk_sort_accu : sorts -> Univ.Level.t array -> t val mk_var_accu : identifier -> t val mk_sw_accu : annot_sw -> accumulator -> t -> (t -> t) val mk_prod_accu : name -> t -> t -> t |