Print cartridge info when loaded
This commit is contained in:
parent
f0cab3f1c6
commit
e260011665
|
@ -114,4 +114,5 @@ let print_info cartridge =
|
|||
printf "Title: %s\n" cartridge.title;
|
||||
printf "Mem. type: %s\n" (cartridge.mem_type |> mem_type_name);
|
||||
printf "ROM size: %iKB\n" cartridge.rom_size;
|
||||
printf "RAM size: %iKB\n" cartridge.ram_size
|
||||
printf "RAM size: %iKB\n" cartridge.ram_size;
|
||||
print_newline ()
|
||||
|
|
|
@ -12,5 +12,5 @@ let load_cartridge file =
|
|||
let cartridge = Cartridge.read_cartridge file in
|
||||
!state.cartridge <- cartridge;
|
||||
match cartridge with
|
||||
| Some _ -> true
|
||||
| Some c -> Cartridge.print_info c; true
|
||||
| None -> false
|
||||
|
|
Loading…
Reference in a new issue