Apple-2gs-SW/65816-crypto
1
0
Fork 0
mirror of https://github.com/sheumann/65816-crypto.git synced 2024-11-21 16:31:11 +00:00
Code Issues Projects Releases Wiki Activity

Reduce duplicated code in SHA-256 implementation.

Browse Source
This commit is contained in:
Stephen Heumann 2017-07-03 14:33:17 -05:00
parent 91c107eb98
commit 61bc8f8b4f
1 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
sha256.asm
View File

@ -174,13 +174,10 @@ SHA256_PROCESSBLOCK start
lda #k
sta k_ptr
ComputeSchedule 1
BlockLoopPart 1
jsr ComputeScheduleSub
BlockLoopPart 2
jsr ComputeScheduleSub
BlockLoopPart 3
jsr ComputeScheduleSub
BlockLoopPart 4
jsr BlockLoopSub
jsr ScheduleAndBlockLoopSub
jsr ScheduleAndBlockLoopSub
jsr ScheduleAndBlockLoopSub
endloop clc
lda h0
@ -247,7 +244,9 @@ endloop clc
sta h7+2
rtl
ComputeScheduleSub anop
ScheduleAndBlockLoopSub anop
ComputeSchedule 2
BlockLoopSub anop
BlockLoopPart 1
rts
end