diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 14:06:36 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-30 14:06:36 +0000 |
| commit | 124f80e26b3d39e3a156404fdcf5d3160d4ca6b8 (patch) | |
| tree | 36d2fb89d35bd25c1f551080bc5d7a6e369793ad | |
| parent | a6d26a0d1f5085282638e083a7375c19e3a4ca47 (diff) | |
| download | perl-124f80e26b3d39e3a156404fdcf5d3160d4ca6b8.tar.gz | |
More -Wall cleanup from Schwern; the EBCDIC MD5.xs checksum
is now wrong.
p4raw-id: //depot/perl@10326
| -rw-r--r-- | ext/Digest/MD5/MD5.xs | 2 | ||||
| -rw-r--r-- | t/lib/md5-file.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/ext/Digest/MD5/MD5.xs b/ext/Digest/MD5/MD5.xs index 12642ae166..32ba8d4c7c 100644 --- a/ext/Digest/MD5/MD5.xs +++ b/ext/Digest/MD5/MD5.xs @@ -136,7 +136,7 @@ static unsigned char PADDING[64] = { /* F, G, H and I are basic MD5 functions. */ -#define F(x, y, z) (((x) & ((y) ^ (z)) ^ (z))) +#define F(x, y, z) ((((x) & ((y) ^ (z))) ^ (z))) #define G(x, y, z) F(z, x, y) #define H(x, y, z) ((x) ^ (y) ^ (z)) #define I(x, y, z) ((y) ^ ((x) | (~z))) diff --git a/t/lib/md5-file.t b/t/lib/md5-file.t index 2aec7e34b7..7d57da06dc 100644 --- a/t/lib/md5-file.t +++ b/t/lib/md5-file.t @@ -21,7 +21,7 @@ EOT } else { # ASCII $EXPECT = <<EOT; 3d0146bf194e4fe68733d00fba02a49e ext/Digest/MD5/MD5.pm -f32f264090fdd2b85a4a9be8b1342752 ext/Digest/MD5/MD5.xs +5526659171a63f532d990dd73791b60e ext/Digest/MD5/MD5.xs EOT } |