Skip to content

Commit c599b32

Browse files
committed
Kill old parser support for type-parametric modules. We don't support those.
1 parent 5297582 commit c599b32

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/boot/fe/item.ml

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -840,14 +840,14 @@ and parse_mod_item (ps:pstate) : (Ast.ident * Ast.mod_item) =
840840
| _ -> CONV_cdecl
841841
in
842842
expect ps MOD;
843-
let (ident, params) = parse_ident_and_params ps "native mod" in
843+
let ident = Pexp.parse_ident ps in
844844
let path = parse_lib_name ident in
845845
let items = parse_mod_items_from_signature ps in
846846
let bpos = lexpos ps in
847847
let rlib = REQUIRED_LIB_c { required_libname = path;
848848
required_prefix = ps.pstate_depth }
849849
in
850-
let item = decl params (Ast.MOD_ITEM_mod items) in
850+
let item = decl [||] (Ast.MOD_ITEM_mod items) in
851851
let item = span ps apos bpos item in
852852
note_required_mod ps {lo=apos; hi=bpos} conv rlib item;
853853
(ident, item)

0 commit comments

Comments
 (0)