9 lines
237 B
OCaml
9 lines
237 B
OCaml
let read filename =
|
|
let ic = open_in filename in
|
|
let length = in_channel_length ic in
|
|
let content = really_input_string ic length in
|
|
close_in ic;
|
|
content
|
|
|
|
let split filename char =
|
|
String.split_on_char char (read filename) |