1 files changed, 1 insertions, 1 deletions
diff --git a/reduce.c b/reduce.c
index 5a7208d..a75f0a4 100644
--- a/reduce.c
+++ b/reduce.c
@@ -1856,7 +1856,7 @@ L3: if(arg1==NIL)lexfail(lastarg);
 
     case READY(NEG):         /*    NEG x => -x, if x is a number */
     UPLEFT;
-    if(tag[lastarg]==INT)simpl(bignegate(lastarg));
+    if(tag[lastarg]==INT)simpl(big_negate(lastarg));
     else setdbl(e,-get_dbl(lastarg));
     goto DONE;