diff --git a/C/arith1.c b/C/arith1.c
index 154f3a321..a41834344 100644
--- a/C/arith1.c
+++ b/C/arith1.c
@@ -1387,7 +1387,6 @@ p_round(Term t E_ARGS)
     RBIG_FL(vl);
   } else {
     double vl = rint(dbl);
-    printf("vl is %d\n", vl);
     RFLOAT(vl);
   }
 }