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:
vgilc 2017-10-13 12:02:59 +02:00
commit 4d5a129ec4
1 changed files with 1 additions and 1 deletions

View File

@ -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) {