From 08e3fbb986bed2f39cc5dca806faca9654c3a6df Mon Sep 17 00:00:00 2001 From: Werner Koch Date: Mon, 28 May 2001 21:12:27 +0000 Subject: Merged back some changes fron gnupg. Fixed doc building. --- mpi/hppa1.1/mpih-mul1.S | 21 ++++++++++++--------- mpi/hppa1.1/mpih-mul2.S | 21 ++++++++++++--------- mpi/hppa1.1/mpih-mul3.S | 21 ++++++++++++--------- mpi/hppa1.1/udiv-qrnnd.S | 20 +++++++++++--------- 4 files changed, 47 insertions(+), 36 deletions(-) (limited to 'mpi/hppa1.1') diff --git a/mpi/hppa1.1/mpih-mul1.S b/mpi/hppa1.1/mpih-mul1.S index 1f737747..ac9baced 100644 --- a/mpi/hppa1.1/mpih-mul1.S +++ b/mpi/hppa1.1/mpih-mul1.S @@ -1,16 +1,17 @@ /* hppa1.1 mul_1 -- Multiply a limb vector with a limb and store * the result in a second limb vector. - * Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. - * Copyright (C) 1998 Free Software Foundation, Inc. * - * This file is part of GNUPG. + * Copyright (C) 1992, 1993, 1994, 1998, + * 2001 Free Software Foundation, Inc. * - * GNUPG is free software; you can redistribute it and/or modify + * This file is part of GnuPG. + * + * GnuPG is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * - * GNUPG is distributed in the hope that it will be useful, + * GnuPG is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. @@ -58,7 +59,7 @@ .code .export mpihelp_mul_1 -mpihelp_mul_1 + .label mpihelp_mul_1 .proc .callinfo frame=64,no_calls .entry @@ -81,7 +82,8 @@ mpihelp_mul_1 ldw -12(%r30),%r1 ; Main loop -L$loop fldws,ma 4(%r25),%fr5 + .label L$loop + fldws,ma 4(%r25),%fr5 stws,ma %r19,4(%r26) addc %r28,%r1,%r19 xmpyu %fr4,%fr5,%fr6 @@ -90,7 +92,8 @@ L$loop fldws,ma 4(%r25),%fr5 addib,<> -1,%r24,L$loop ldw -12(%r30),%r1 -L$end stws,ma %r19,4(%r26) + .label L$end + stws,ma %r19,4(%r26) addc %r28,%r1,%r19 ldw -16(%r30),%r28 stws,ma %r19,4(%r26) @@ -98,7 +101,7 @@ L$end stws,ma %r19,4(%r26) bv 0(%r2) ldo -64(%r30),%r30 -L$just_one_limb + .label L$just_one_limb xmpyu %fr4,%fr5,%fr6 fstds %fr6,-16(%r30) ldw -16(%r30),%r28 diff --git a/mpi/hppa1.1/mpih-mul2.S b/mpi/hppa1.1/mpih-mul2.S index 89c02595..c73397e3 100644 --- a/mpi/hppa1.1/mpih-mul2.S +++ b/mpi/hppa1.1/mpih-mul2.S @@ -1,16 +1,17 @@ /* hppa1.1 addmul_1 -- Multiply a limb vector with a limb and add * the result to a second limb vector. - * Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. - * Copyright (C) 1998 Free Software Foundation, Inc. * - * This file is part of GNUPG. + * Copyright (C) 1992, 1993, 1994, 1998, + * 2001 Free Software Foundation, Inc. * - * GNUPG is free software; you can redistribute it and/or modify + * This file is part of GnuPG. + * + * GnuPG is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * - * GNUPG is distributed in the hope that it will be useful, + * GnuPG is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. @@ -48,7 +49,7 @@ .code .export mpihelp_addmul_1 -mpihelp_addmul_1 + .label mpihelp_addmul_1 .proc .callinfo frame=64,no_calls .entry @@ -71,7 +72,8 @@ mpihelp_addmul_1 ldw -12(%r30),%r1 ; Main loop -L$loop ldws 0(%r26),%r29 + .label L$loop + ldws 0(%r26),%r29 fldws,ma 4(%r25),%fr5 add %r29,%r19,%r19 stws,ma %r19,4(%r26) @@ -83,7 +85,8 @@ L$loop ldws 0(%r26),%r29 addib,<> -1,%r24,L$loop ldw -12(%r30),%r1 -L$end ldw 0(%r26),%r29 + .label L$end + ldw 0(%r26),%r29 add %r29,%r19,%r19 stws,ma %r19,4(%r26) addc %r28,%r1,%r19 @@ -96,7 +99,7 @@ L$end ldw 0(%r26),%r29 bv 0(%r2) ldo -64(%r30),%r30 -L$just_one_limb + .label L$just_one_limb xmpyu %fr4,%fr5,%fr6 ldw 0(%r26),%r29 fstds %fr6,-16(%r30) diff --git a/mpi/hppa1.1/mpih-mul3.S b/mpi/hppa1.1/mpih-mul3.S index 80868a3e..f9ccb1b5 100644 --- a/mpi/hppa1.1/mpih-mul3.S +++ b/mpi/hppa1.1/mpih-mul3.S @@ -1,16 +1,17 @@ /* hppa1.1 submul_1 -- Multiply a limb vector with a limb and add * the result to a second limb vector. - * Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. - * Copyright (C) 1998 Free Software Foundation, Inc. * - * This file is part of GNUPG. + * Copyright (C) 1992, 1993, 1994, 1998, + * 2001 Free Software Foundation, Inc. * - * GNUPG is free software; you can redistribute it and/or modify + * This file is part of GnuPG. + * + * GnuPG is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * - * GNUPG is distributed in the hope that it will be useful, + * GnuPG is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. @@ -55,7 +56,7 @@ .code .export mpihelp_submul_1 -mpihelp_submul_1 + .label mpihelp_submul_1 .proc .callinfo frame=64,no_calls .entry @@ -78,7 +79,8 @@ mpihelp_submul_1 ldw -12(%r30),%r1 ; Main loop -L$loop ldws 0(%r26),%r29 + .label L$loop + ldws 0(%r26),%r29 fldws,ma 4(%r25),%fr5 sub %r29,%r19,%r22 add %r22,%r19,%r0 @@ -91,7 +93,8 @@ L$loop ldws 0(%r26),%r29 addib,<> -1,%r24,L$loop ldw -12(%r30),%r1 -L$end ldw 0(%r26),%r29 + .label L$end + ldw 0(%r26),%r29 sub %r29,%r19,%r22 add %r22,%r19,%r0 stws,ma %r22,4(%r26) @@ -106,7 +109,7 @@ L$end ldw 0(%r26),%r29 bv 0(%r2) ldo -64(%r30),%r30 -L$just_one_limb + .label L$just_one_limb xmpyu %fr4,%fr5,%fr6 ldw 0(%r26),%r29 fstds %fr6,-16(%r30) diff --git a/mpi/hppa1.1/udiv-qrnnd.S b/mpi/hppa1.1/udiv-qrnnd.S index b48eee49..a1643d70 100644 --- a/mpi/hppa1.1/udiv-qrnnd.S +++ b/mpi/hppa1.1/udiv-qrnnd.S @@ -1,17 +1,17 @@ /* HP-PA __udiv_qrnnd division support, used from longlong.h. * This version runs fast on PA 7000 and later. * - * Copyright (C) 1993, 1994 Free Software Foundation, Inc. - * Copyright (C) 1998 Free Software Foundation, Inc. + * Copyright (C) 1993, 1994, 1998, + * 2001 Free Software Foundation, Inc. * - * This file is part of GNUPG. + * This file is part of GnuPG. * - * GNUPG is free software; you can redistribute it and/or modify + * GnuPG is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * - * GNUPG is distributed in the hope that it will be useful, + * GnuPG is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. @@ -39,10 +39,11 @@ */ .code -L$0000 .word 0x43f00000 + .label L$0000 + .word 0x43f00000 .word 0x0 .export __udiv_qrnnd -__udiv_qrnnd + .label __udiv_qrnnd .proc .callinfo frame=64,no_calls .entry @@ -58,7 +59,7 @@ __udiv_qrnnd fcnvxf,dbl,dbl %fr5,%fr5 fldds 0(0,%r19),%fr4 fadd,dbl %fr4,%fr5,%fr5 -L$1 + .label L$1 fcpy,sgl %fr0,%fr6L fldws -12(0,%r30),%fr6R fcnvxf,dbl,dbl %fr6,%fr4 @@ -79,7 +80,8 @@ L$1 add %r22,%r23,%r22 ldo -1(%r28),%r28 -L$2 bv 0(%r2) + .label L$2 + bv 0(%r2) stws %r22,0(0,%r26) .exit -- cgit v1.2.1