diff options
author | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-06-27 16:51:52 +0000 |
---|---|---|
committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-06-27 16:51:52 +0000 |
commit | a1596ac8127071db6c507909bd9723edc720542d (patch) | |
tree | 854a8532246222a4fcff6818a1cfc7972155c86f /lib | |
parent | 67a755713eaabf37f4d8e5fd85b4fb04e316938a (diff) |
Getting rid of IntroPatternArgType.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16610 85f007b7-540e-0410-9357-904b9bb8a0f7
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 dbde4652c..77c8922a0 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 14133fff0..d395136af 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 |