diff options
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/genarg.ml | 6 | ||||
| -rw-r--r-- | interp/genarg.mli | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/interp/genarg.ml b/interp/genarg.ml index 091a5c8731..65f0433d30 100644 --- a/interp/genarg.ml +++ b/interp/genarg.ml @@ -65,9 +65,9 @@ type 'a generic_argument = argument_type * Obj.t let dyntab = ref ([] : string list) -type rlevel = constr_expr -type glevel = rawconstr_and_expr -type tlevel = open_constr +type rlevel +type glevel +type tlevel type ('a,'b) abstract_argument_type = argument_type diff --git a/interp/genarg.mli b/interp/genarg.mli index 48e5b3c31b..ef7c3e864e 100644 --- a/interp/genarg.mli +++ b/interp/genarg.mli @@ -114,9 +114,9 @@ ExtraArgType of string '_a '_b out_gen is monomorphic over 'a, hence type-safe *) -type rlevel = constr_expr -type glevel = rawconstr_and_expr -type tlevel = open_constr +type rlevel +type glevel +type tlevel type ('a,'co) abstract_argument_type |