SHA-256: Difference between revisions
→{{header|Perl 6}}: [Z[m+]]= works now, so let's use it
(→{{header|Perl 6}}: [Z[m+]]= works now, so let's use it) |
|||
Line 1,097:
@h = $t1 m+ $t2, @h[^3], @h[3] m+ $t1, @h[4..6];
}
@H
}
return Blob.new: map { reverse .polymod(256 xx 3) }, @H;
| |||