(** http://bgb.bircd.org/pandocs.htm#cpuregistersandflags *)

type registers = {
  a : char;
  b : char;
  c : char;
  d : char;
  e : char;
  h : char;
  l : char;

  sp : int;
  pc : int;
}

type flags = {
  zf : bool;
  n  : bool;
  h  : bool;
  cy : bool;
}

type t = {
  reg : registers;
  flags : flags;
}