From 09184b1ab9be700d0cb5125c113b4fb8d6be06c8 Mon Sep 17 00:00:00 2001 From: David Monniaux Date: Mon, 20 Apr 2020 15:16:34 +0200 Subject: fix int64 --- runtime/mppa_k1c/i64_udivmod_stsud.s | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'runtime') diff --git a/runtime/mppa_k1c/i64_udivmod_stsud.s b/runtime/mppa_k1c/i64_udivmod_stsud.s index b1d10326..50d0a767 100644 --- a/runtime/mppa_k1c/i64_udivmod_stsud.s +++ b/runtime/mppa_k1c/i64_udivmod_stsud.s @@ -135,6 +135,8 @@ __compcert_i64_udiv_stsud: __compcert_i64_sdiv_stsud: compd.lt $r2 = $r0, 0 compd.lt $r3 = $r1, 0 + absd $r0 = $r0 + absd $r1 = $r1 ;; xord $r2 = $r2, $r3 make $r3 = 0 @@ -144,6 +146,8 @@ __compcert_i64_sdiv_stsud: .globl __compcert_i64_smod_stsud __compcert_i64_smod_stsud: compd.lt $r2 = $r0, 0 + absd $r0 = $r0 + absd $r1 = $r1 make $r3 = 1 goto __compcert_i64_divmod_stsud ;; -- cgit