summaryrefslogtreecommitdiff
path: root/mpn
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2002-07-10 01:59:31 +0200
committerKevin Ryde <user42@zip.com.au>2002-07-10 01:59:31 +0200
commite3e8c5c3056213c1e08e0c51f96274755d7b3b46 (patch)
treedcd153c333c76b2e03b7efa8dcf997393cc61bdd /mpn
parent3b2c0334c59d1688d7f1d4dd3f3e2e2dd758e3e1 (diff)
downloadgmp-e3e8c5c3056213c1e08e0c51f96274755d7b3b46.tar.gz
* mpn/pa32/*.asm: Use LDEF.
Diffstat (limited to 'mpn')
-rw-r--r--mpn/pa32/add_n.asm4
-rw-r--r--mpn/pa32/hppa1_1/addmul_1.asm6
-rw-r--r--mpn/pa32/hppa1_1/mul_1.asm6
-rw-r--r--mpn/pa32/hppa1_1/sqr_diagonal.asm4
-rw-r--r--mpn/pa32/hppa1_1/submul_1.asm6
-rw-r--r--mpn/pa32/hppa1_1/udiv.asm4
-rw-r--r--mpn/pa32/hppa2_0/add_n.asm16
-rw-r--r--mpn/pa32/hppa2_0/sqr_diagonal.asm12
-rw-r--r--mpn/pa32/hppa2_0/sub_n.asm16
-rw-r--r--mpn/pa32/lshift.asm8
-rw-r--r--mpn/pa32/rshift.asm8
-rw-r--r--mpn/pa32/sub_n.asm4
-rw-r--r--mpn/pa32/udiv.asm6
13 files changed, 50 insertions, 50 deletions
diff --git a/mpn/pa32/add_n.asm b/mpn/pa32/add_n.asm
index 9b201c445..57200878d 100644
--- a/mpn/pa32/add_n.asm
+++ b/mpn/pa32/add_n.asm
@@ -40,14 +40,14 @@ PROLOGUE(mpn_add_n)
addib,= -1,%r23,L(end) C check for (SIZE == 1)
add %r20,%r19,%r28 C add first limbs ignoring cy
- .label L(loop)
+LDEF(loop)
ldws,ma 4(0,%r25),%r20
ldws,ma 4(0,%r24),%r19
stws,ma %r28,4(0,%r26)
addib,<> -1,%r23,L(loop)
addc %r20,%r19,%r28
- .label L(end)
+LDEF(end)
stws %r28,0(0,%r26)
bv 0(%r2)
addc %r0,%r0,%r28
diff --git a/mpn/pa32/hppa1_1/addmul_1.asm b/mpn/pa32/hppa1_1/addmul_1.asm
index 40fefe505..db203c1fc 100644
--- a/mpn/pa32/hppa1_1/addmul_1.asm
+++ b/mpn/pa32/hppa1_1/addmul_1.asm
@@ -57,7 +57,7 @@ C .callinfo frame=64,no_calls
ldw -12(%r30),%r1
C Main loop
- .label L(loop)
+LDEF(loop)
ldws 0(%r26),%r29
fldws,ma 4(%r25),%fr5
add %r29,%r19,%r19
@@ -70,7 +70,7 @@ C Main loop
addib,<> -1,%r24,L(loop)
ldw -12(%r30),%r1
- .label L(end)
+LDEF(end)
ldw 0(%r26),%r29
add %r29,%r19,%r19
stws,ma %r19,4(%r26)
@@ -84,7 +84,7 @@ C Main loop
bv 0(%r2)
ldo -64(%r30),%r30
- .label L(just_one_limb)
+LDEF(just_one_limb)
xmpyu %fr4,%fr5,%fr6
ldw 0(%r26),%r29
fstds %fr6,-16(%r30)
diff --git a/mpn/pa32/hppa1_1/mul_1.asm b/mpn/pa32/hppa1_1/mul_1.asm
index 0b680963c..bd401fd3a 100644
--- a/mpn/pa32/hppa1_1/mul_1.asm
+++ b/mpn/pa32/hppa1_1/mul_1.asm
@@ -65,7 +65,7 @@ C .callinfo frame=64,no_calls
ldw -12(%r30),%r1
C Main loop
- .label L(loop)
+LDEF(loop)
fldws,ma 4(%r25),%fr5
stws,ma %r19,4(%r26)
addc %r28,%r1,%r19
@@ -75,7 +75,7 @@ C Main loop
addib,<> -1,%r24,L(loop)
ldw -12(%r30),%r1
- .label L(end)
+LDEF(end)
stws,ma %r19,4(%r26)
addc %r28,%r1,%r19
ldw -16(%r30),%r28
@@ -84,7 +84,7 @@ C Main loop
bv 0(%r2)
ldo -64(%r30),%r30
- .label L(just_one_limb)
+LDEF(just_one_limb)
xmpyu %fr4,%fr5,%fr6
fstds %fr6,-16(%r30)
ldw -16(%r30),%r28
diff --git a/mpn/pa32/hppa1_1/sqr_diagonal.asm b/mpn/pa32/hppa1_1/sqr_diagonal.asm
index 53e4254b7..34a69a04d 100644
--- a/mpn/pa32/hppa1_1/sqr_diagonal.asm
+++ b/mpn/pa32/hppa1_1/sqr_diagonal.asm
@@ -37,14 +37,14 @@ PROLOGUE(mpn_sqr_diagonal)
addib,= -1,n,L(exit)
xmpyu %fr4r,%fr4r,%fr5
- .label L(loop)
+LDEF(loop)
fldws,ma 4(up),%fr4r
fstws %fr5r,-4(rp)
fstws,ma %fr5l,8(rp)
addib,<> -1,n,L(loop)
xmpyu %fr4r,%fr4r,%fr5
- .label L(exit)
+LDEF(exit)
fstws %fr5r,-4(rp)
bv 0(%r2)
fstws %fr5l,0(rp)
diff --git a/mpn/pa32/hppa1_1/submul_1.asm b/mpn/pa32/hppa1_1/submul_1.asm
index b3747ba3b..14ac66289 100644
--- a/mpn/pa32/hppa1_1/submul_1.asm
+++ b/mpn/pa32/hppa1_1/submul_1.asm
@@ -62,7 +62,7 @@ C .callinfo frame=64,no_calls
ldw -12(%r30),%r1
C Main loop
- .label L(loop)
+LDEF(loop)
ldws 0(%r26),%r29
fldws,ma 4(%r25),%fr5
sub %r29,%r19,%r22
@@ -76,7 +76,7 @@ C Main loop
addib,<> -1,%r24,L(loop)
ldw -12(%r30),%r1
- .label L(end)
+LDEF(end)
ldw 0(%r26),%r29
sub %r29,%r19,%r22
add %r22,%r19,%r0
@@ -92,7 +92,7 @@ C Main loop
bv 0(%r2)
ldo -64(%r30),%r30
- .label L(just_one_limb)
+LDEF(just_one_limb)
xmpyu %fr4,%fr5,%fr6
ldw 0(%r26),%r29
fstds %fr6,-16(%r30)
diff --git a/mpn/pa32/hppa1_1/udiv.asm b/mpn/pa32/hppa1_1/udiv.asm
index 0fb302e53..091af4bc8 100644
--- a/mpn/pa32/hppa1_1/udiv.asm
+++ b/mpn/pa32/hppa1_1/udiv.asm
@@ -66,7 +66,7 @@ ifdef(`PIC',
fldds 0(0,%r31),%fr4
fadd,dbl %fr4,%fr5,%fr5
- .label L(1)
+LDEF(1)
fcpy,sgl %fr0,%fr6L
fldws -12(0,%r30),%fr6R
fcnvxf,dbl,dbl %fr6,%fr4
@@ -88,7 +88,7 @@ ifdef(`PIC',
add %r22,%r23,%r22
ldo -1(%r28),%r28
- .label L(2)
+LDEF(2)
bv 0(%r2)
stws %r22,0(0,%r26)
.exit
diff --git a/mpn/pa32/hppa2_0/add_n.asm b/mpn/pa32/hppa2_0/add_n.asm
index fc0f14356..816532639 100644
--- a/mpn/pa32/hppa2_0/add_n.asm
+++ b/mpn/pa32/hppa2_0/add_n.asm
@@ -41,49 +41,49 @@ PROLOGUE(mpn_add_n)
blr %r28,%r0 C branch into loop
add %r0,%r0,%r0 C reset carry
- .label L(loop)
+LDEF(loop)
ldw 0(%r25),%r20
ldw 0(%r24),%r31
addc %r20,%r31,%r20
stw %r20,0(%r26)
- .label L(7)
+LDEF(7)
ldw 4(%r25),%r21
ldw 4(%r24),%r19
addc %r21,%r19,%r21
stw %r21,4(%r26)
- .label L(6)
+LDEF(6)
ldw 8(%r25),%r20
ldw 8(%r24),%r31
addc %r20,%r31,%r20
stw %r20,8(%r26)
- .label L(5)
+LDEF(5)
ldw 12(%r25),%r21
ldw 12(%r24),%r19
addc %r21,%r19,%r21
stw %r21,12(%r26)
- .label L(4)
+LDEF(4)
ldw 16(%r25),%r20
ldw 16(%r24),%r31
addc %r20,%r31,%r20
stw %r20,16(%r26)
- .label L(3)
+LDEF(3)
ldw 20(%r25),%r21
ldw 20(%r24),%r19
addc %r21,%r19,%r21
stw %r21,20(%r26)
- .label L(2)
+LDEF(2)
ldw 24(%r25),%r20
ldw 24(%r24),%r31
addc %r20,%r31,%r20
stw %r20,24(%r26)
- .label L(1)
+LDEF(1)
ldw 28(%r25),%r21
ldo 32(%r25),%r25
ldw 28(%r24),%r19
diff --git a/mpn/pa32/hppa2_0/sqr_diagonal.asm b/mpn/pa32/hppa2_0/sqr_diagonal.asm
index 463aa45f4..c27855ba8 100644
--- a/mpn/pa32/hppa2_0/sqr_diagonal.asm
+++ b/mpn/pa32/hppa2_0/sqr_diagonal.asm
@@ -45,7 +45,7 @@ PROLOGUE(mpn_sqr_diagonal)
xmpyu %fr6r,%fr6r,%fr7
- .label L(loop)
+LDEF(loop)
fldws,ma 4(up),%fr6r
fstws %fr5r,-4(rp)
fstws,ma %fr5l,8(rp)
@@ -57,7 +57,7 @@ PROLOGUE(mpn_sqr_diagonal)
addib,<> -1,n,L(loop)
xmpyu %fr6r,%fr6r,%fr7
- .label L(exito)
+LDEF(exito)
fstws %fr5r,-4(rp)
fstws %fr5l,0(rp)
xmpyu %fr4r,%fr4r,%fr5
@@ -67,7 +67,7 @@ PROLOGUE(mpn_sqr_diagonal)
bv 0(%r2)
fstws %fr5l,4(rp)
- .label L(exite)
+LDEF(exite)
fstws %fr7r,-4(rp)
fstws %fr7l,0(rp)
xmpyu %fr6r,%fr6r,%fr7
@@ -77,13 +77,13 @@ PROLOGUE(mpn_sqr_diagonal)
bv 0(%r2)
fstws %fr7l,4(rp)
- .label L(end1)
+LDEF(end1)
xmpyu %fr4r,%fr4r,%fr5
fstws %fr5r,-4(rp)
bv 0(%r2)
fstws,ma %fr5l,8(rp)
- .label L(end2)
+LDEF(end2)
xmpyu %fr6r,%fr6r,%fr7
fstws %fr5r,-4(rp)
fstws %fr5l,0(rp)
@@ -91,7 +91,7 @@ PROLOGUE(mpn_sqr_diagonal)
bv 0(%r2)
fstws %fr7l,8(rp)
- .label L(end3)
+LDEF(end3)
fstws %fr5r,-4(rp)
fstws %fr5l,0(rp)
xmpyu %fr4r,%fr4r,%fr5
diff --git a/mpn/pa32/hppa2_0/sub_n.asm b/mpn/pa32/hppa2_0/sub_n.asm
index d6b930dee..fc4b00f47 100644
--- a/mpn/pa32/hppa2_0/sub_n.asm
+++ b/mpn/pa32/hppa2_0/sub_n.asm
@@ -40,49 +40,49 @@ PROLOGUE(mpn_sub_n)
blr %r28,%r0 C branch into loop
sub %r26,%r22,%r26 C offset res_ptr and set carry
- .label L(loop)
+LDEF(loop)
ldw 0(%r25),%r20
ldw 0(%r24),%r31
subb %r20,%r31,%r20
stw %r20,0(%r26)
- .label L(7)
+LDEF(7)
ldw 4(%r25),%r21
ldw 4(%r24),%r19
subb %r21,%r19,%r21
stw %r21,4(%r26)
- .label L(6)
+LDEF(6)
ldw 8(%r25),%r20
ldw 8(%r24),%r31
subb %r20,%r31,%r20
stw %r20,8(%r26)
- .label L(5)
+LDEF(5)
ldw 12(%r25),%r21
ldw 12(%r24),%r19
subb %r21,%r19,%r21
stw %r21,12(%r26)
- .label L(4)
+LDEF(4)
ldw 16(%r25),%r20
ldw 16(%r24),%r31
subb %r20,%r31,%r20
stw %r20,16(%r26)
- .label L(3)
+LDEF(3)
ldw 20(%r25),%r21
ldw 20(%r24),%r19
subb %r21,%r19,%r21
stw %r21,20(%r26)
- .label L(2)
+LDEF(2)
ldw 24(%r25),%r20
ldw 24(%r24),%r31
subb %r20,%r31,%r20
stw %r20,24(%r26)
- .label L(1)
+LDEF(1)
ldw 28(%r25),%r21
ldo 32(%r25),%r25
ldw 28(%r24),%r19
diff --git a/mpn/pa32/lshift.asm b/mpn/pa32/lshift.asm
index 393f4dc0c..ec1b9202c 100644
--- a/mpn/pa32/lshift.asm
+++ b/mpn/pa32/lshift.asm
@@ -40,7 +40,7 @@ PROLOGUE(mpn_lshift)
addib,= -1,%r24,L(0002)
vshd %r22,%r29,%r20
- .label L(loop)
+LDEF(loop)
ldws,mb -4(0,%r25),%r22
stws,mb %r20,-4(0,%r26)
addib,= -1,%r24,L(0003)
@@ -50,16 +50,16 @@ PROLOGUE(mpn_lshift)
addib,<> -1,%r24,L(loop)
vshd %r22,%r29,%r20
- .label L(0002)
+LDEF(0002)
stws,mb %r20,-4(0,%r26)
vshd %r29,%r0,%r20
bv 0(%r2)
stw %r20,-4(0,%r26)
- .label L(0003)
+LDEF(0003)
stws,mb %r20,-4(0,%r26)
- .label L(0004)
+LDEF(0004)
vshd %r22,%r0,%r20
bv 0(%r2)
stw %r20,-4(0,%r26)
diff --git a/mpn/pa32/rshift.asm b/mpn/pa32/rshift.asm
index f4efdab42..e453f0b41 100644
--- a/mpn/pa32/rshift.asm
+++ b/mpn/pa32/rshift.asm
@@ -37,7 +37,7 @@ PROLOGUE(mpn_rshift)
addib,= -1,%r24,L(0002)
vshd %r29,%r22,%r20
- .label L(loop)
+LDEF(loop)
ldws,ma 4(0,%r25),%r22
stws,ma %r20,4(0,%r26)
addib,= -1,%r24,L(0003)
@@ -47,16 +47,16 @@ PROLOGUE(mpn_rshift)
addib,<> -1,%r24,L(loop)
vshd %r29,%r22,%r20
- .label L(0002)
+LDEF(0002)
stws,ma %r20,4(0,%r26)
vshd %r0,%r29,%r20
bv 0(%r2)
stw %r20,0(0,%r26)
- .label L(0003)
+LDEF(0003)
stws,ma %r20,4(0,%r26)
- .label L(0004)
+LDEF(0004)
vshd %r0,%r22,%r20
bv 0(%r2)
stw %r20,0(0,%r26)
diff --git a/mpn/pa32/sub_n.asm b/mpn/pa32/sub_n.asm
index 33a15e468..0909a15a3 100644
--- a/mpn/pa32/sub_n.asm
+++ b/mpn/pa32/sub_n.asm
@@ -40,14 +40,14 @@ PROLOGUE(mpn_sub_n)
addib,= -1,%r23,L(end) C check for (SIZE == 1)
sub %r20,%r19,%r28 C subtract first limbs ignoring cy
- .label L(loop)
+LDEF(loop)
ldws,ma 4(0,%r25),%r20
ldws,ma 4(0,%r24),%r19
stws,ma %r28,4(0,%r26)
addib,<> -1,%r23,L(loop)
subb %r20,%r19,%r28
- .label L(end)
+LDEF(end)
stws %r28,0(0,%r26)
addc %r0,%r0,%r28
bv 0(%r2)
diff --git a/mpn/pa32/udiv.asm b/mpn/pa32/udiv.asm
index ff4c8a47e..10c2ba954 100644
--- a/mpn/pa32/udiv.asm
+++ b/mpn/pa32/udiv.asm
@@ -107,7 +107,7 @@ PROLOGUE(mpn_udiv_qrnnd)
bv 0(%r2)
addc %r28,%r28,%r28
- .label L(largedivisor)
+LDEF(largedivisor)
extru %r24,31,1,%r19 C r19 = n0 & 1
bb,< %r23,31,L(odd)
extru %r23,30,31,%r22 C r22 = d >> 1
@@ -186,7 +186,7 @@ PROLOGUE(mpn_udiv_qrnnd)
bv 0(%r2)
addc %r24,%r24,%r28
- .label L(odd)
+LDEF(odd)
addib,sv,n 1,%r22,L(FFFFFFFF) C r22 = (d / 2 + 1)
shd %r25,%r24,1,%r24 C r24 = new n0
extru %r25,30,31,%r25 C r25 = new n1
@@ -272,7 +272,7 @@ C We have computed (n1,,n0) / (d + 1), q' = r28, r' = r25
C This is just a special case of the code above.
C We come here when d == 0xFFFFFFFF
- .label L(FFFFFFFF)
+LDEF(FFFFFFFF)
add,uv %r25,%r24,%r24
sub,<< %r24,%r23,%r0
ldo 1(%r24),%r24