Motorola DSP56000 Manual page 625

count set
dup
dc
ount set
endm
org
count set
dup
dc
count set
endm
endm
bergorder macro points,bergtable,offset
bergorder ident 1,3
;bergorder generates bergland order table
move
move
generated
move
move
move
move
move
move
move
move
move
move
move
move
do
move
lsr
move
nop
move
lsl
move
_star move
cmp
jle
move
move
move
MOTOROLA
BENCHMARK PROGRAMS
0
points/4
@cos(@cvf(count)*freq)
count+1
x:coef
0
points/4
@sin(@cvf(count)*freq)
count+1
;end of bergsincos macro
#>4,a
#points,r4
#>points/4,b
#bergtable,r0
b,n0
#>0,x0
x0,x:(r0)+n0
#>2,x0
x0,x:(r0)+n0
#>1,x0
x0,x:(r0)+n0
#>3,x0
x0,x:(r0)
#bergtable,n0
#@cvi(@log(points/4)/@log(2)),_endl
b,x0
b
b,r0
a,x:(r0+n0)
a
a,y1
r4,a
x0,a
_loop
x0,r0
y1,a
x:(r0+n0),y0
BENCHMARK PROGRAMS
;points=number of points of bergtable to be
;nitial pointer
;table resides in
;init offset
;seeds
;location of bergtable
;x0=i+i
;b=i
;r0=i
;k-> bergtable
;k=k*2
;save A content
;r4=# of points
;x0=j, if j< points, cont
;r0=i+i=j,b=i
;recover A=k
;y0=bergtabl[j]
B - 21