Commit 685c3aa8 authored by Timothy Bourke's avatar Timothy Bourke Committed by Gwenaël Delaval

Accept .lus file extension

parent 66da5f4b
......@@ -117,7 +117,7 @@ let compile source_f =
source_f |> Filename.dirname |> add_include;
check_options ();
match Misc.file_extension source_f with
| "ept" -> compile_program modname source_f
| "ept" | "lus" -> compile_program modname source_f
| "epi" -> compile_interface modname source_f
| ext -> raise (Arg.Bad ("Unknow file type: " ^ ext ^ " for file: " ^ source_f))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment