diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/genarg.ml | 2 | ||||
| -rw-r--r-- | lib/genarg.mli | 1 |
2 files changed, 0 insertions, 3 deletions
diff --git a/lib/genarg.ml b/lib/genarg.ml index dbde4652c7..77c8922a0a 100644 --- a/lib/genarg.ml +++ b/lib/genarg.ml @@ -12,7 +12,6 @@ open Util type argument_type = (* Basic types *) | IntOrVarArgType - | IntroPatternArgType | IdentArgType of bool | VarArgType | RefArgType @@ -34,7 +33,6 @@ type argument_type = let rec argument_type_eq arg1 arg2 = match arg1, arg2 with | IntOrVarArgType, IntOrVarArgType -> true -| IntroPatternArgType, IntroPatternArgType -> true | IdentArgType b1, IdentArgType b2 -> (b1 : bool) == b2 | VarArgType, VarArgType -> true | RefArgType, RefArgType -> true diff --git a/lib/genarg.mli b/lib/genarg.mli index 14133fff03..d395136af7 100644 --- a/lib/genarg.mli +++ b/lib/genarg.mli @@ -181,7 +181,6 @@ val app_pair : type argument_type = (** Basic types *) | IntOrVarArgType - | IntroPatternArgType | IdentArgType of bool | VarArgType | RefArgType |