From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 16 Aug 2001 00:29:29 +0000 (+0000)
Subject: Add a test for Unicode sprintf.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ecbfecb9e052974d6dde629b704db3485e8ae7df;p=p5sagit%2Fp5-mst-13.2.git

Add a test for Unicode sprintf.

p4raw-id: //depot/perl@11687
---

diff --git a/t/op/misc.t b/t/op/misc.t
index 3869030..e7f1623 100755
--- a/t/op/misc.t
+++ b/t/op/misc.t
@@ -724,5 +724,10 @@ sub DESTROY {
 EXPECT
 Bar=ARRAY(0x...)
 ########
+printf "%x %x", unpack "U*", sprintf "\x{1234}%s", "\x{5678}"
+EXPECT
+1234 5678
+########
+# keep this last - doesn't seem to work otherwise?
 eval "a.b.c.d.e.f;sub"
 EXPECT