sig
  type mips =
      I of string * Register.reg * int
    | R of string * Register.reg * Register.reg
    | RI of string * Register.reg * Register.reg * int
    | RR of string * Register.reg * Register.reg * Register.reg
    | LW of Register.reg * Register.reg * int
    | SW of Register.reg * Register.reg * int
    | Syscall
  val print_mips : Pervasives.out_channel -> Mips.mips -> unit
end