aboutsummaryrefslogtreecommitdiffstats
path: root/mppa_k1c/TargetPrinter.ml
diff options
context:
space:
mode:
Diffstat (limited to 'mppa_k1c/TargetPrinter.ml')
-rw-r--r--mppa_k1c/TargetPrinter.ml6
1 files changed, 6 insertions, 0 deletions
diff --git a/mppa_k1c/TargetPrinter.ml b/mppa_k1c/TargetPrinter.ml
index 8e3cce5a..ad06500e 100644
--- a/mppa_k1c/TargetPrinter.ml
+++ b/mppa_k1c/TargetPrinter.ml
@@ -222,6 +222,12 @@ module Target : TARGET =
assert false
end
+ (* Pseudo-instructions not generated by Asmgen *)
+ | Pclzll(rd, rs) ->
+ fprintf oc " clzll %a = %a\n;;\n" ireg rd ireg rs
+ | Pstsud(rd, rs1, rs2) ->
+ fprintf oc " stsud %a = %a, %a\n;;\n" ireg rd ireg rs1 ireg rs2
+
let print_cf_instruction oc = function
| Pget (rd, rs) ->
fprintf oc " get %a = %a\n;;\n" ireg rd preg rs