diff options
author | 2018-06-01 02:37:15 +0200 | |
---|---|---|
committer | 2018-06-12 14:42:28 +0200 | |
commit | 615290d0f9d5cad7c508d45cf4ab89aecff033b2 (patch) | |
tree | f5db022987df54435d807017f4f647ca9e275e9c /interp/constrexpr.ml | |
parent | 4aaeb5d429227505adfde9fe04c3c0fb69f2d37f (diff) |
[api] Remove Misctypes.
We move the last 3 types to more adequate places.
Diffstat (limited to 'interp/constrexpr.ml')
-rw-r--r-- | interp/constrexpr.ml | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/interp/constrexpr.ml b/interp/constrexpr.ml index 60f2c683a..d725f5afa 100644 --- a/interp/constrexpr.ml +++ b/interp/constrexpr.ml @@ -22,6 +22,15 @@ type name_decl = lname * universe_decl_expr option type notation = string +type 'a or_by_notation_r = + | AN of 'a + | ByNotation of (string * string option) + +type 'a or_by_notation = 'a or_by_notation_r CAst.t + +(* NB: the last string in [ByNotation] is actually a [Notation.delimiters], + but this formulation avoids a useless dependency. *) + type explicitation = | ExplByPos of int * Id.t option (* a reference to the n-th product starting from left *) | ExplByName of Id.t |