From cad31392c718379b881a051eb8e7936dfeff43df Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Thu, 15 Oct 1998 17:49:30 +0200
Subject: [PATCH] Fixed bug.
Rev: src/testsuite.in:1.129
---
src/testsuite.in | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/testsuite.in b/src/testsuite.in
index 350905a7f9..2187fbbaab 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.128 1998/10/15 13:53:49 grubba Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.129 1998/10/15 15:49:30 grubba Exp $"]])
cond([[all_constants()->_verify_internals]],
[[
test_do(_verify_internals())
@@ -2400,7 +2400,7 @@ test_any([[int x=time(); sleep(2); return x!=time()]],1)
// - string_to_unicode, unicode_to_string
test_eq(string_to_unicode("foo"), "\0f\0o\0o")
-test_eq(string_to_unicode("bl�"), "\0b\0l\o�")
+test_eq(string_to_unicode("bl�"), "\0b\0l\0�")
test_eq(string_to_unicode("\77077"), "\176\77")
test_eq(string_to_unicode("\777077"), "\330\277\336\77")
// Enable when unicode_to_string() understands surrogates.
--
GitLab