diff options
| author | Chun Bing Ge <gecb@cn.ibm.com> | 2007-08-03 22:16:34 +0800 |
|---|---|---|
| committer | Abhijit Menon-Sen <ams@wiw.org> | 2007-08-03 07:49:28 +0000 |
| commit | 34cd037df94a4e384dfaf78f348e460a3c9dafd8 (patch) | |
| tree | a4f54ab4d12140902167b143ab6beeb6eee1371d /ext/Storable | |
| parent | 59512d541d940e2068ddcb5dcce91e75b73f0ab8 (diff) | |
| download | perl-34cd037df94a4e384dfaf78f348e460a3c9dafd8.tar.gz | |
problems in ext/Storable/t/file_magic.t on EBCDIC platform
Message-Id: <OF9205F187.AEDD9A24-ON4825732C.0021701B-4825732C.002279E4@IBMCN>
p4raw-id: //depot/perl@31678
Diffstat (limited to 'ext/Storable')
| -rw-r--r-- | ext/Storable/t/file_magic.t | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/ext/Storable/t/file_magic.t b/ext/Storable/t/file_magic.t index f5606c5ff7..f834510287 100644 --- a/ext/Storable/t/file_magic.t +++ b/ext/Storable/t/file_magic.t @@ -120,7 +120,7 @@ my @tests = ( }, ], [ - "pst0\4\4\x041234\4\4\4\b\3\13\0\0\0\1\0\4\0\0\0\0\0\0\0\0\0...", + "pst0\4\4\x041234\4\4\4\x08\3\13\0\0\0\1\0\4\0\0\0\0\0\0\0\0\0...", { byteorder => 1234, file => "data_perl-5.006001_i686-linux-thread-multi_Storable-1.012.le32", @@ -137,7 +137,7 @@ my @tests = ( }, ], [ - "pst0\4\3\x044321\4\4\4\b\3\0\0\0\13\1\0\0\4\0\0\0\0\0\0\0\0...", + "pst0\4\3\x044321\4\4\4\x08\3\0\0\0\13\1\0\0\4\0\0\0\0\0\0\0\0...", { byteorder => 4321, file => "data_perl-5.006001_IA64.ARCHREV_0-thread-multi_Storable-1.006.be32", @@ -166,7 +166,7 @@ my @tests = ( }, ], [ - "pst0\4\4\x044321\4\4\4\b\3\0\0\0\13\1\0\0\4\0\0\0\0\0\0\0\0...", + "pst0\4\4\x044321\4\4\4\x08\3\0\0\0\13\1\0\0\4\0\0\0\0\0\0\0\0...", { byteorder => 4321, file => "data_perl-5.006001_IA64.ARCHREV_0-thread-multi_Storable-1.012.be32", @@ -195,7 +195,7 @@ my @tests = ( }, ], [ - "pst0\4\6\x044321\4\4\4\b\3\0\0\0\13\n\n4294967296...", + "pst0\4\6\x044321\4\4\4\x08\3\0\0\0\13\n\n4294967296...", { byteorder => 4321, file => "data_perl-5.008001_darwin-thread-multi-2level_Storable-2.08.be32", @@ -224,7 +224,7 @@ my @tests = ( }, ], [ - "pst0\4\6\x044321\4\4\4\b\3\0\0\0\13\4\3\0\0\0\0\0\0\0\nem...", + "pst0\4\6\x044321\4\4\4\x08\3\0\0\0\13\4\3\0\0\0\0\0\0\0\nem...", { byteorder => 4321, file => "data_perl-5.008003_PA-RISC1.1-thread-multi_Storable-2.09.be32", @@ -253,7 +253,7 @@ my @tests = ( }, ], [ - "pst0\4\6\b12345678\4\4\4\b\3\13\0\0\0\4\3\0\0\0\0\n\0...", + "pst0\4\6\x0812345678\4\4\4\x08\3\13\0\0\0\4\3\0\0\0\0\n\0...", { byteorder => 12_345_678, file => "data_perl-5.008004_i86pc-solaris-64int_Storable-2.12.le64", @@ -270,7 +270,7 @@ my @tests = ( }, ], [ - "pst0\4\6\x041234\4\4\4\b\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", + "pst0\4\6\x041234\4\4\4\x08\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", { byteorder => 1234, file => "data_perl-5.008006_i686-linux-thread-multi_Storable-2.13.le32", @@ -287,7 +287,7 @@ my @tests = ( }, ], [ - "pst0\4\6\b87654321\4\b\b\b\3\0\0\0\13\4\3\0\0\0\0\0\0...", + "pst0\4\6\x0887654321\4\x08\x08\x08\3\0\0\0\13\4\3\0\0\0\0\0\0...", { byteorder => 87_654_321, file => "data_perl-5.008007_IA64.ARCHREV_0-thread-multi-LP64_Storable-2.13.be64", @@ -304,7 +304,7 @@ my @tests = ( }, ], [ - "pst0\4\a\b12345678\4\b\b\b\3\13\0\0\0\4\3\0\0\0\0\n\0...", + "pst0\4\x07\x0812345678\4\x08\x08\x08\3\13\0\0\0\4\3\0\0\0\0\n\0...", { byteorder => 12_345_678, file => "data_perl-5.008007_x86-solaris-thread-multi-64_Storable-2.15.le64", @@ -321,7 +321,7 @@ my @tests = ( }, ], [ - "pst0\5\a\3\0\0\0\13\4\3\0\0\0\0\0\0\0\nempty_hash\n...", + "pst0\5\x07\3\0\0\0\13\4\3\0\0\0\0\0\0\0\nempty_hash\n...", { file => "data_perl-5.008007_x86-solaris-thread-multi-64_Storable-2.15.neutral", hdrsize => 6, @@ -333,7 +333,7 @@ my @tests = ( }, ], [ - "pst0\4\5\x041234\4\4\4\b\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", + "pst0\4\5\x041234\4\4\4\x08\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", { byteorder => 1234, file => "data_perl-5.008_i686-linux-thread-multi_Storable-2.04.le32", @@ -362,7 +362,7 @@ my @tests = ( }, ], [ - "pst0\4\a\x041234\4\4\4\b\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", + "pst0\4\x07\x041234\4\4\4\x08\3\13\0\0\0\4\3\0\0\0\0\n\0\0\0em...", { byteorder => 1234, file => "data_perl-5.009003_i686-linux_Storable-2.15.le32", |