(* State of the world, contains all the required information at any point *)
type t = {
cartridge : option Cartridge.t;
}
(* Global reference *)
let state = ref {
cartridge = None