Integrate OCaml in Qt project

This commit is contained in:
Fabien Freling 2019-05-08 23:09:31 +02:00
parent 3c0c2cff6f
commit dbc17bb003
8 changed files with 59 additions and 2 deletions

View file

@ -60,7 +60,7 @@ let power_up cartridge =
run cpu mem screen
let () =
let main =
if Array.length Sys.argv < 2 then begin
prerr_endline "Please specify a ROM.";
eprintf "Usage: %s path/to/rom\n" Sys.argv.(0);
@ -71,3 +71,6 @@ let () =
match cartridge with
| None -> print_endline "Invalid ROM file."
| Some c -> power_up c
(** let () =
main *)