swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fmt

Browse source
This commit is contained in:
swrup 2025-11-11 02:32:45 +01:00
parent aa2ff7b2f0
commit ab118e0c1e
4 changed files with 27 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

12
src/assets.ml
View file

@ -87,12 +87,12 @@ let supported_lang_arr, supported_ext_arr =
let lang_l =
path_l
|> List.map (fun path ->
match Fpath.segs path with
| [] -> assert false
| [ dir; _file ] -> dir
| _l ->
Fmt.failwith "invalid folder structure, file `%s` is misplaced"
(Fpath.to_string path))
match Fpath.segs path with
| [] -> assert false
| [ dir; _file ] -> dir
| _l ->
Fmt.failwith "invalid folder structure, file `%s` is misplaced"
(Fpath.to_string path))
|> List.sort_uniq String.compare
in
let () =