1 files changed, 1 insertions, 1 deletions
diff --git a/reduce.c b/reduce.c
index b5e7284..6b88409 100644
--- a/reduce.c
+++ b/reduce.c
@@ -2116,7 +2116,7 @@ L3: if(arg1==NIL)lexfail(lastarg);
       fa=get_dbl(arg1),fb=big_tod(lastarg); else
     if(big_is_negative(lastarg))
       fa=big_tod(arg1),fb=big_tod(lastarg);
-    else { simpl(bigpow(arg1,lastarg));
+    else { simpl(big_pow(arg1,lastarg));
 	   goto DONE; }
     errno=0; /* to clear */
     setdbl(e,pow(fa,fb));