MD5/Implementation: Difference between revisions

Content added Content deleted

Inline

@@ Line 4,844: / Line 4,844: @@
     |map { blob32.new: @$_ },
       {
-        $^b.push($_) for (@$msg, 0x80, 0x00 xx (-(bits div 8 + 1 + 8) % 64))
+        $^b.push(blob8.new(@$_).read-uint32(0)) for (@$msg, 0x80, 0x00 xx (-(bits div 8 + 1 + 8) % 64))
-            .flat.rotor(4).map({ :256[@^a.reverse] });
+            .flat.rotor(4);
         $b.write-uint64: $b.elems, bits, LittleEndian;
         $b;