Avoid using a _ pattern where it's not necessary

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
Rudi Grinberg 2018-08-05 22:00:05 +03:00
parent 0e6dda2032
commit fe6fae0ff0
1 changed files with 2 additions and 1 deletions

View File

@ -612,7 +612,8 @@ let rec get sctx ~dir =
~modules:(modules_of_files ~dir:d.ctx_dir ~files)) ~modules:(modules_of_files ~dir:d.ctx_dir ~files))
; mlds = lazy (build_mlds_map d ~files) ; mlds = lazy (build_mlds_map d ~files)
} }
| _ -> | Some (_, None)
| None ->
{ kind = Standalone { kind = Standalone
; dir ; dir
; text_files = String.Set.empty ; text_files = String.Set.empty