Skip to content
Snippets Groups Projects
Commit 4011a085 authored by Bernhard Schommer's avatar Bernhard Schommer Committed by Xavier Leroy
Browse files

Added missing printer for PowerPC 64 bit comparison.

These comparisons are supported in the hybrid 64 bit mode.
Bug 30035
parent acaabc6c
No related branches found
No related tags found
No related merge requests found
......@@ -42,6 +42,14 @@ let print_condition reg pp = function
fprintf pp "%a & 0x%lx == 0" reg r1 (camlint_of_coqint n)
| (Cmasknotzero n, [r1]) ->
fprintf pp "%a & 0x%lx != 0" reg r1 (camlint_of_coqint n)
| (Ccompl c, [r1;r2]) ->
fprintf pp "%a %sls %a" reg r1 (comparison_name c) reg r2
| (Ccomplu c, [r1;r2]) ->
fprintf pp "%a %slu %a" reg r1 (comparison_name c) reg r2
| (Ccomplimm(c, n), [r1]) ->
fprintf pp "%a %sls %Ld" reg r1 (comparison_name c) (camlint64_of_coqint n)
| (Ccompluimm(c, n), [r1]) ->
fprintf pp "%a %slu %Ld" reg r1 (comparison_name c) (camlint64_of_coqint n)
| _ ->
fprintf pp "<bad condition>"
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment