diff options
| author | Gaëtan Gilbert | 2017-09-08 14:58:28 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2017-09-08 18:42:37 +0200 |
| commit | b71e68fb78ccde52f1aaa63ef26f0135b92e9be5 (patch) | |
| tree | fd07ca12f3aa602a082cc960a82f031ea72fa7c3 /intf | |
| parent | b1fbec7e3945fe2965f4ba9f80c8c31b821dbce1 (diff) | |
Parse directly to Sorts.family when appropriate.
When we used to parse to a glob_sort but always give an empty list in
the GType case we can now parse directly to Sorts.family.
Diffstat (limited to 'intf')
| -rw-r--r-- | intf/vernacexpr.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/intf/vernacexpr.ml b/intf/vernacexpr.ml index 2adf522b74..a02f1a9d4e 100644 --- a/intf/vernacexpr.ml +++ b/intf/vernacexpr.ml @@ -169,7 +169,7 @@ type option_ref_value = (** Identifier and optional list of bound universes. *) type plident = lident * lident list option -type sort_expr = glob_sort +type sort_expr = Sorts.family type definition_expr = | ProveBody of local_binder_expr list * constr_expr |