Skip to content

Commit 4011a08

Browse files
bschommerxavierleroy
authored andcommitted
Added missing printer for PowerPC 64 bit comparison.
These comparisons are supported in the hybrid 64 bit mode. Bug 30035
1 parent acaabc6 commit 4011a08

File tree

1 file changed

+8
-0
lines changed

1 file changed

+8
-0
lines changed

powerpc/PrintOp.ml

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -42,6 +42,14 @@ let print_condition reg pp = function
4242
fprintf pp "%a & 0x%lx == 0" reg r1 (camlint_of_coqint n)
4343
| (Cmasknotzero n, [r1]) ->
4444
fprintf pp "%a & 0x%lx != 0" reg r1 (camlint_of_coqint n)
45+
| (Ccompl c, [r1;r2]) ->
46+
fprintf pp "%a %sls %a" reg r1 (comparison_name c) reg r2
47+
| (Ccomplu c, [r1;r2]) ->
48+
fprintf pp "%a %slu %a" reg r1 (comparison_name c) reg r2
49+
| (Ccomplimm(c, n), [r1]) ->
50+
fprintf pp "%a %sls %Ld" reg r1 (comparison_name c) (camlint64_of_coqint n)
51+
| (Ccompluimm(c, n), [r1]) ->
52+
fprintf pp "%a %slu %Ld" reg r1 (comparison_name c) (camlint64_of_coqint n)
4553
| _ ->
4654
fprintf pp "<bad condition>"
4755

0 commit comments

Comments
 (0)