(** This module provides functions to print the operators of the
    MIPS processor. *)

(* Pasted from Pottier's PP compiler *)

open PrintPottier

val unop: 'reg printer -> (MIPSOps.unop * 'reg * 'reg) printer
val binop: MIPSOps.binop -> string
val uncon: 'reg printer -> (MIPSOps.uncon * 'reg) printer
val bincon: MIPSOps.bincon -> string