first
This commit is contained in:
commit
29d8387656
|
@ -0,0 +1,2 @@
|
|||
_build
|
||||
.merlin
|
|
@ -0,0 +1,6 @@
|
|||
let days = [|Day1.main|]
|
||||
|
||||
let _ =
|
||||
match Array.to_list Sys.argv with
|
||||
| _exename :: day :: args -> days.(int_of_string day - 1) args
|
||||
| _ -> Usage.exit "[day_num] args..."
|
|
@ -0,0 +1,6 @@
|
|||
let main2 _input =
|
||||
print_endline "boop"
|
||||
|
||||
let main = function
|
||||
| [input] -> main2 input
|
||||
| _ -> failwith "usage: $0 1 infile"
|
|
@ -0,0 +1 @@
|
|||
(lang dune 2.7)
|
Loading…
Reference in New Issue