diff options
| author | Alasdair Armstrong | 2018-08-15 17:39:49 +0100 |
|---|---|---|
| committer | Alasdair Armstrong | 2018-08-16 15:04:13 +0100 |
| commit | b1ccdc07a945d47a0ef5ca9bdec575f6b831cd27 (patch) | |
| tree | fe694dc3541ade7ffa64116ca64a765a95c7d55d /src/parse_ast.ml | |
| parent | 5d3c6b295ca18efd8ca8c9e52245766f2c2c7394 (diff) | |
Various cleanups to ott grammar
Add additional well-formedness check when calling typing rules
Diffstat (limited to 'src/parse_ast.ml')
| -rw-r--r-- | src/parse_ast.ml | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/parse_ast.ml b/src/parse_ast.ml index b5875ea7..d9ffb184 100644 --- a/src/parse_ast.ml +++ b/src/parse_ast.ml @@ -424,9 +424,7 @@ name_scm_opt = type default_typing_spec_aux = (* Default kinding or typing assumption, and default order for literal vectors and vector shorthands *) - DT_kind of base_kind * kid - | DT_order of base_kind * atyp - | DT_typ of typschm * id + DT_order of base_kind * atyp type mpat_aux = (* Mapping pattern. Mostly the same as normal patterns but only constructible parts *) |