В файле SHA.pas в функции sha512_compress() вот в этом фрагменте получается неверный результат функции Gamma0(W [i - 15]):
for i := 16 to 79 do
W[i] := Gamma1(W[i - 2]) + W[i - 7] + Gamma0(W [i - 15]) + W[i - 16];
|
Ответов: 4621
Рейтинг: 746
|
|||
|
Только что хотел сказать, чтобы проверили на Delphi 7. Какая-то лажа у Delphi 4 получается при операциях с Int64.
В файле SHA.pas в функции sha512_compress() вот в этом фрагменте получается неверный результат функции Gamma0(W [i - 15]): |
|||
| карма: 26 |
|
Редактировалось 1 раз(а), последний 2017-01-26 14:30:23
Поиск
Друзья
Администрация