diff options
Diffstat (limited to 'mpi/pa7100')
| -rw-r--r-- | mpi/pa7100/mpih-lshift.S | 22 | ||||
| -rw-r--r-- | mpi/pa7100/mpih-rshift.S | 22 |
2 files changed, 28 insertions, 16 deletions
diff --git a/mpi/pa7100/mpih-lshift.S b/mpi/pa7100/mpih-lshift.S index d7b00be9b..76368fe78 100644 --- a/mpi/pa7100/mpih-lshift.S +++ b/mpi/pa7100/mpih-lshift.S @@ -1,5 +1,5 @@ /* hppa lshift - * optimized for the PA7100, where is runs at 3.25 cycles/limb + * optimized for the PA7100, where it runs at 3.25 cycles/limb * * Copyright (C) 1992, 1994, 1998, * 2001 Free Software Foundation, Inc. @@ -33,7 +33,7 @@ .code .export mpihelp_lshift -mpihelp_lshift + .label mpihelp_lshift .proc .callinfo frame=64,no_calls .entry @@ -49,7 +49,8 @@ mpihelp_lshift addib,<= -5,%r24,L$rest vshd %r22,%r29,%r20 -L$loop ldws,mb -4(0,%r25),%r22 + .label L$loop + ldws,mb -4(0,%r25),%r22 stws,mb %r20,-4(0,%r26) vshd %r29,%r22,%r20 ldws,mb -4(0,%r25),%r29 @@ -63,9 +64,11 @@ L$loop ldws,mb -4(0,%r25),%r22 addib,> -4,%r24,L$loop vshd %r22,%r29,%r20 -L$rest addib,= 4,%r24,L$end1 + .label L$rest + addib,= 4,%r24,L$end1 nop -L$eloop ldws,mb -4(0,%r25),%r22 + .label L$eloop + ldws,mb -4(0,%r25),%r22 stws,mb %r20,-4(0,%r26) addib,<= -1,%r24,L$end2 vshd %r29,%r22,%r20 @@ -74,12 +77,15 @@ L$eloop ldws,mb -4(0,%r25),%r22 addib,> -1,%r24,L$eloop vshd %r22,%r29,%r20 -L$end1 stws,mb %r20,-4(0,%r26) + .label L$end1 + stws,mb %r20,-4(0,%r26) vshd %r29,%r0,%r20 bv 0(%r2) stw %r20,-4(0,%r26) -L$end2 stws,mb %r20,-4(0,%r26) -L$0004 vshd %r22,%r0,%r20 + .label L$end2 + stws,mb %r20,-4(0,%r26) + .label L$0004 + vshd %r22,%r0,%r20 bv 0(%r2) stw %r20,-4(0,%r26) diff --git a/mpi/pa7100/mpih-rshift.S b/mpi/pa7100/mpih-rshift.S index 187933595..3bada7ce9 100644 --- a/mpi/pa7100/mpih-rshift.S +++ b/mpi/pa7100/mpih-rshift.S @@ -1,5 +1,5 @@ /* hppa rshift - * optimized for the PA7100, where is runs at 3.25 cycles/limb + * optimized for the PA7100, where it runs at 3.25 cycles/limb * * Copyright (C) 1992, 1994, 1998, * 2001 Free Software Foundation, Inc. @@ -33,7 +33,7 @@ .code .export mpihelp_rshift -mpihelp_rshift + .label mpihelp_rshift .proc .callinfo frame=64,no_calls .entry @@ -46,7 +46,8 @@ mpihelp_rshift addib,<= -5,%r24,L$rrest vshd %r29,%r22,%r20 -L$roop ldws,ma 4(0,%r25),%r22 + .label L$roop + ldws,ma 4(0,%r25),%r22 stws,ma %r20,4(0,%r26) vshd %r22,%r29,%r20 ldws,ma 4(0,%r25),%r29 @@ -60,9 +61,11 @@ L$roop ldws,ma 4(0,%r25),%r22 addib,> -4,%r24,L$roop vshd %r29,%r22,%r20 -L$rrest addib,= 4,%r24,L$rend1 + .label L$rrest + addib,= 4,%r24,L$rend1 nop -L$eroop ldws,ma 4(0,%r25),%r22 + .label L$eroop + ldws,ma 4(0,%r25),%r22 stws,ma %r20,4(0,%r26) addib,<= -1,%r24,L$rend2 vshd %r22,%r29,%r20 @@ -71,12 +74,15 @@ L$eroop ldws,ma 4(0,%r25),%r22 addib,> -1,%r24,L$eroop vshd %r29,%r22,%r20 -L$rend1 stws,ma %r20,4(0,%r26) + .label L$rend1 + stws,ma %r20,4(0,%r26) vshd %r0,%r29,%r20 bv 0(%r2) stw %r20,0(0,%r26) -L$rend2 stws,ma %r20,4(0,%r26) -L$r004 vshd %r0,%r22,%r20 + .label L$rend2 + stws,ma %r20,4(0,%r26) + .label L$r004 + vshd %r0,%r22,%r20 bv 0(%r2) stw %r20,0(0,%r26) |