22 lines
390 B
ArmAsm
22 lines
390 B
ArmAsm
|
#include "powerpc.h"
|
||
|
|
|
||
|
|
.sect .text
|
||
|
|
|
||
|
|
! Create empty set.
|
||
|
|
! Stack: ( -- set )
|
||
|
|
! With r3 = size of set
|
||
|
|
|
||
|
|
.define .zer
|
||
|
|
.zer:
|
||
|
|
rlwinm r7, r3, 30, 2, 31
|
||
|
|
addi r4, r0, 0 ! r4 = zero
|
||
|
|
neg r5, r3
|
||
|
|
add sp, sp, r5 ! allocate set
|
||
|
|
mr r6, sp ! r6 = ptr to set
|
||
|
|
mtspr ctr, r7 ! ctr = r3 / 4
|
||
|
|
1:
|
||
|
|
stw r4, 0(r6) ! store zero in set
|
||
|
|
addi r6, r6, 4
|
||
|
|
bc DNZ, 0, 1b ! loop ctr times
|
||
|
|
bclr ALWAYS, 0, 0
|