Skip to content

Commit

Permalink
Fix older OCamls
Browse files Browse the repository at this point in the history
Signed-off-by: Jon Ludlam <jon@recoil.org>
  • Loading branch information
jonludlam committed Feb 8, 2021
1 parent 9a92326 commit 440ef6c
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/loader/ident_env.cppo.ml
Original file line number Diff line number Diff line change
Expand Up @@ -184,14 +184,14 @@ let extract_signature_tree_item item =
| Some id -> `Module (id, false) :: items
| None -> items)
mds []
| Tsig_value {val_id; _} ->
[`Value (val_id, false)]
#else
| Tsig_module { md_id; _ } ->
[`Module (md_id, false)]
| Tsig_recmodule mds ->
List.map (fun md -> `Module (md.md_id, false)) mds
#endif
| Tsig_value {val_id; _} ->
[`Value (val_id, false)]
| Tsig_modtype mtd ->
[`ModuleType (mtd.mtd_id, false)]
| Tsig_include incl ->
Expand Down

0 comments on commit 440ef6c

Please # to comment.