21 lines
354 B
ArmAsm
21 lines
354 B
ArmAsm
|
#include "powerpc.h"
|
||
|
|
|
||
|
|
.sect .text
|
||
|
|
|
||
|
|
! Set complement.
|
||
|
|
! Stack: ( a -- ~a )
|
||
|
|
! With r3 = size of set
|
||
|
|
|
||
|
|
.define .com
|
||
|
|
.com:
|
||
|
|
mr r4, sp ! r4 = pointer to set a
|
||
|
|
rlwinm r5, r3, 30, 2, 31
|
||
|
|
mtspr ctr, r5 ! ctr = r3 / 4
|
||
|
|
1:
|
||
|
|
lwz r6, 0(r4)
|
||
|
|
nor r6, r6, r6 ! complement of word
|
||
|
|
stw r6, 0(r4)
|
||
|
|
addi r4, r4, 4
|
||
|
|
bc DNZ, 0, 1b ! loop ctr times
|
||
|
|
bclr ALWAYS, 0, 0
|