Clean open statements.
This commit is contained in:
parent
91ad537af9
commit
dad26e3f4b
|
@ -1,6 +1,3 @@
|
||||||
open Unix
|
|
||||||
open Printf
|
|
||||||
|
|
||||||
(** http://bgb.bircd.org/pandocs.htm#thecartridgeheader *)
|
(** http://bgb.bircd.org/pandocs.htm#thecartridgeheader *)
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -8,6 +8,7 @@ let power_up cartridge =
|
||||||
then print_endline "Invalid ROM."
|
then print_endline "Invalid ROM."
|
||||||
else
|
else
|
||||||
print_endline "Valid ROM.";
|
print_endline "Valid ROM.";
|
||||||
|
printf "Title: %s\n" cartridge.title;
|
||||||
printf "ROM size: %iKB\n" cartridge.rom_size;
|
printf "ROM size: %iKB\n" cartridge.rom_size;
|
||||||
printf "RAM size: %iKB\n" cartridge.ram_size
|
printf "RAM size: %iKB\n" cartridge.ram_size
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue