1 files changed, 1 insertions, 1 deletions
diff --git a/arith.c b/arith.c
index 6f19a63e..d736e925 100644
--- a/arith.c
+++ b/arith.c
@@ -743,7 +743,7 @@ val zerop(val num)
     return t;
 
   if (!fixnump(num) && !bignump(num))
-    uw_throwf(error_s, lit("zerof: ~s is not a number"), num, nao);
+    uw_throwf(error_s, lit("zerop: ~s is not a number"), num, nao);
   return nil;
 }