Change 16175 by gsar@rake on 2002/04/26 01:10:17
MD5.xs checksum, ascii only (TODO: someone with access to an EBCDIC
platform needs to fill in the other branch here)
Affected files ...
.... //depot/perl/ext/Digest/MD5/t/files.t#6 edit
Differences ...
==== //depot/perl/ext/Digest/MD5/t/files.t#6 (text) ====
Index: perl/ext/Digest/MD5/t/files.t
--- perl/ext/Digest/MD5/t/files.t.~1~ Thu Apr 25 19:15:05 2002
+++ perl/ext/Digest/MD5/t/files.t Thu Apr 25 19:15:05 2002
@@ -16,12 +16,12 @@
if (ord('A') == 193) { # EBCDIC
$EXPECT = <<EOT;
ee6a09094632cd610199278bbb0f910e ext/Digest/MD5/MD5.pm
-491dfb1027eb154cff18beb609d6068a ext/Digest/MD5/MD5.xs
+XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX ext/Digest/MD5/MD5.xs
EOT
} else { # ASCII
$EXPECT = <<EOT;
665ddc08b12d6b1bf85ac6dc5aae68b3 ext/Digest/MD5/MD5.pm
-95444a9c6ad17e443e4606c6c7fd9e28 ext/Digest/MD5/MD5.xs
+5f21e907b2e7dbffe6aba2c762ea93d0 ext/Digest/MD5/MD5.xs
EOT
}
End of Patch.
