1
/* hppa sub_n -- Sub two limb vectors of the same length > 0 and store
2
* sum in a third limb vector.
4
* Copyright (C) 1992, 1994, 1998,
5
* 2001 Free Software Foundation, Inc.
7
* This file is part of GnuPG.
9
* GnuPG is free software; you can redistribute it and/or modify
10
* it under the terms of the GNU General Public License as published by
11
* the Free Software Foundation; either version 2 of the License, or
12
* (at your option) any later version.
14
* GnuPG is distributed in the hope that it will be useful,
15
* but WITHOUT ANY WARRANTY; without even the implied warranty of
16
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17
* GNU General Public License for more details.
19
* You should have received a copy of the GNU General Public License
20
* along with this program; if not, write to the Free Software
21
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
23
* Note: This code is heavily based on the GNU MP Library.
24
* Actually it's the same code with only minor changes in the
25
* way the data is stored; this is to support the abstraction
26
* of an optional secure memory allocation which may be used
27
* to avoid revealing of sensitive data due to paging etc.
28
* The GNU MP Library itself is published under the LGPL;
29
* however I decided to publish this code under the plain GPL.
34
#include "asm-syntax.h"
39
* mpihelp_sub_n( mpi_ptr_t res_ptr, (gr26)
40
* mpi_ptr_t s1_ptr, (gr25)
41
* mpi_ptr_t s2_ptr, (gr24)
42
* mpi_size_t size) (gr23)
44
* One might want to unroll this as for other processors, but it turns
45
* out that the data cache contention after a store makes such
46
* unrolling useless. We can't come under 5 cycles/limb anyway.
54
.callinfo frame=0,no_calls
57
ldws,ma 4(0,%r25),%r20
58
ldws,ma 4(0,%r24),%r19
60
addib,= -1,%r23,L$end ; check for (SIZE == 1)
61
sub %r20,%r19,%r28 ; subtract first limbs ignoring cy
64
ldws,ma 4(0,%r25),%r20
65
ldws,ma 4(0,%r24),%r19
66
stws,ma %r28,4(0,%r26)
67
addib,<> -1,%r23,L$loop