Merge branch 'configuracion-remota-en-32-bits' into 'develop'
Replace a 32 bit shift with two 16 bit shifts. See merge request !875
This commit is contained in:
commit
4d5a129ec4
|
@ -1363,7 +1363,7 @@ sub md5 {
|
|||
# Append bit /* bit, not byte */ length of unpadded message as 64-bit
|
||||
# little-endian integer to message.
|
||||
$msg .= unpack ("B32", pack ("V", $bit_len));
|
||||
$msg .= unpack ("B32", pack ("V", $bit_len >> 32));
|
||||
$msg .= unpack ("B32", pack ("V", ($bit_len >> 16) >> 16));
|
||||
|
||||
# Process the message in successive 512-bit chunks.
|
||||
for (my $i = 0; $i < length ($msg); $i += 512) {
|
||||
|
|
Loading…
Reference in New Issue