1 files changed, 2 insertions, 2 deletions
diff --git a/reduce.c b/reduce.c
index 6b88409..956d5dc 100644
--- a/reduce.c
+++ b/reduce.c
@@ -531,7 +531,7 @@ word e;
     upleft;
     lastarg= reduce(lastarg);          /* ### */
     if(tag[lastarg]==INT)
-      { hold = bigsub(lastarg,arg1);
+      { hold = big_subtract(lastarg,arg1);
         if(big_is_positive(hold))hd[e]=arg2,tl[e]=hold;
         else hd[e]=I,e=tl[e]=FAIL; }
     else hd[e]=I,e=tl[e]=FAIL;
@@ -2056,7 +2056,7 @@ L3: if(arg1==NIL)lexfail(lastarg);
       setdbl(e,get_dbl(arg1)-force_dbl(lastarg)); else
     if(tag[lastarg]==DOUBLE)
       setdbl(e,big_tod(arg1)-get_dbl(lastarg));
-    else simpl(bigsub(arg1,lastarg));
+    else simpl(big_subtract(arg1,lastarg));
     goto DONE;
 
     case READY(TIMES):