From 707c12bf00dafdfd3899b1a6c36435dbbf6c7022 Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Fri, 9 Jan 2026 18:46:32 +0100
Subject: DUALNUM: Improve/fix edge cases of unary minus.

Thanks to Sergey Kaplun. #1422 #1418
---
 src/vm_arm64.dasc | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/vm_arm64.dasc')

diff --git a/src/vm_arm64.dasc b/src/vm_arm64.dasc
index a0789efb..be8b76a7 100644
--- a/src/vm_arm64.dasc
+++ b/src/vm_arm64.dasc
@@ -2687,6 +2687,8 @@ static void build_ins(BuildCtx *ctx, BCOp op, int defop)
     |   movz CARG3, #0x41e0, lsl #48	// 2^31.
     |   add_TISNUM TMP0, TMP0
     |  csel TMP0, TMP0, CARG3, vc
+    |   movz CARG3, #0x8000, lsl #48	// -0.
+    |  csel TMP0, TMP0, CARG3, ne
     |5:
     |  str TMP0, [BASE, RA, lsl #3]
     |  ins_next
-- 
cgit v1.2.3-55-g6feb