diff --git a/bin/test_pike.pike b/bin/test_pike.pike
index d1d51cf1c507f66a9c8a853f1d1f947b8fd68da5..300fcb52decb78630350ea83562b692f744a1ad2 100755
--- a/bin/test_pike.pike
+++ b/bin/test_pike.pike
@@ -1,6 +1,6 @@
 #!/usr/local/bin/pike
 
-/* $Id: test_pike.pike,v 1.23 1999/04/08 22:19:01 hubbe Exp $ */
+/* $Id: test_pike.pike,v 1.24 1999/05/12 04:38:05 hubbe Exp $ */
 
 import Stdio;
 
@@ -242,10 +242,13 @@ int main(int argc, string *argv)
 		if(check > 1) _verify_internals();
 	      }) {
 		werror(fname + " failed.\n");
-		werror(test + "\n");
+		bzot(test);
 		if (arrayp(err) && sizeof(err) && stringp(err[0])) {
 		  werror("Error: " + err[0]);
 		}
+		if (objectp(err)) {
+		  werror("Error: " + err[0]);
+		}
 		errors++;
 		break;
 	      }