diff --git a/ChangeLog b/ChangeLog
index 72b692e134f6dc214b6b94d341c67b4d2c42c355..740ec54a576f2eac150fabd0119574b77754474d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2013-09-28  Niels Möller  <nisse@lysator.liu.se>
 
+	* testsuite/testutils.c (test_hash_large): Added simple progress
+	indicator.
+
 	* macros.h (MD_PAD): Use size argument, don't depend on
 	sizeof of the count field(s).
 
diff --git a/testsuite/testutils.c b/testsuite/testutils.c
index 669669e66883dc42ab36dba88718eb9fac9c2360..d7f391592c4d343e321916d00ca796a28c11bea1 100644
--- a/testsuite/testutils.c
+++ b/testsuite/testutils.c
@@ -592,7 +592,13 @@ test_hash_large(const struct nettle_hash *hash,
 
   hash->init(ctx);
   for (i = 0; i < count; i++)
-    hash->update(ctx, length, data);
+    {
+      hash->update(ctx, length, data);
+      if (i % (count / 50) == 0)
+	fprintf (stderr, ".");
+    }
+  fprintf (stderr, "\n");
+  
   hash->digest(ctx, hash->digest_size, buffer);
 
   print_hex(hash->digest_size, buffer);