end)
fun pp_oper (REG r) = "%" ^ (regname r)
- | pp_oper (TEMP t) = (Temp.name t) ^ (Temp.sfx (Temp.size t))
+ | pp_oper (TEMP t) = (Temp.name t)
| pp_oper (STACKARG i) = "arg#"^Int.toString i
fun pp_insn pr (MOVLIT (d, w)) = "\tmov"^pr^" "^(pp_oper d)^", #"^(Word.toString w)^"\n"