diff --git a/src/testsuite.in b/src/testsuite.in
index e2af507ac29b52d1579ae8f02334e56858c35319..9942317528b9a8051105598c5a7dbda943d1f318 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.163 1999/03/20 22:24:13 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.164 1999/03/30 13:34:17 grubba Exp $"]])
 cond([[all_constants()->_verify_internals]],
 [[
   test_do(_verify_internals())
@@ -2697,6 +2697,9 @@ test_eq(replace("f--barf--",({"f--bar","f--"}),({"f--","f--bar"})),"f--f--bar")
 test_eq(replace("test\ntest\n\ntest\ntest",({"\n","\n\n"}),({" ","<p>"})),"test test<p>test test")
 test_eq(replace("test\ntest\n\ntest\ntest",({"\n\n","\n"}),({"<p>"," "})),"test test<p>test test")
 
+test_eq("123\000456""890"-"\0", "123\456""890")
+test_eq("123\456000""890"-"\0", "123\456000""890")
+
 test_any([[
 function reference=lambda(string x, string *a, string *b)
 {