From d0b081afd74ef291f36db208eaf9fcd9c109b163 Mon Sep 17 00:00:00 2001
From: Aleksey Veresov <aleksey@veresov.pro>
Date: Wed, 6 Jan 2021 09:40:23 +0300
Subject: Fix of neg.

---
 src/csx.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/csx.c')

diff --git a/src/csx.c b/src/csx.c
index f114114..7836793 100644
--- a/src/csx.c
+++ b/src/csx.c
@@ -318,7 +318,7 @@ static void *base_prod(void *arg)
 static void *base_neg(void *arg)
 {
     arg = run_each(arg);
-    return csx_int(-*(int *)head(head(arg)));
+    return csx_int(-*(int *)head(arg));
 }
 
 static void *base_inv(void *arg)
-- 
cgit v1.2.3