← Back to branch summary

~ubuntu-branches/ubuntu/intrepid/ecl/intrepid

« back to all changes in this revision

Viewing changes to src/gmp/mpn/x86/p6/sqr_basecase.asm

  • Committer: Bazaar Package Importer
  • Author(s): Peter Van Eynde
  • Date: 2007-04-09 11:51:51 UTC
  • mfrom: (1.1.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20070409115151-ql8cr0kalzx1jmla
Tags: 0.9i-20070324-2
Upload to unstable. 

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/gmp/mpn/x86/p6/sqr_basecase.asm
1
1
dnl  Intel P6 mpn_sqr_basecase -- square an mpn number.
2
2
 
3
3
dnl  Copyright 1999, 2000, 2002 Free Software Foundation, Inc.
4
 
dnl 
 
4
dnl
5
5
dnl  This file is part of the GNU MP Library.
6
 
dnl 
 
6
dnl
7
7
dnl  The GNU MP Library is free software; you can redistribute it and/or
8
8
dnl  modify it under the terms of the GNU Lesser General Public License as
9
9
dnl  published by the Free Software Foundation; either version 2.1 of the
10
10
dnl  License, or (at your option) any later version.
11
 
dnl 
 
11
dnl
12
12
dnl  The GNU MP Library is distributed in the hope that it will be useful,
13
13
dnl  but WITHOUT ANY WARRANTY; without even the implied warranty of
14
14
dnl  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15
15
dnl  Lesser General Public License for more details.
16
 
dnl 
 
16
dnl
17
17
dnl  You should have received a copy of the GNU Lesser General Public
18
18
dnl  License along with the GNU MP Library; see the file COPYING.LIB.  If
19
 
dnl  not, write to the Free Software Foundation, Inc., 59 Temple Place -
20
 
dnl  Suite 330, Boston, MA 02111-1307, USA.
 
19
dnl  not, write to the Free Software Foundation, Inc., 51 Franklin Street,
 
20
dnl  Fifth Floor, Boston, MA 02110-1301, USA.
21
21
 
22
22
include(`../config.m4')
23
23
 
293
293
deflit(`FRAME',4)  dnl  %esi already pushed
294
294
 
295
295
C First multiply src[0]*src[1..size-1] and store at dst[1..size].
296
 
 
 
296
 
297
297
        subl    $STACK_SPACE-FRAME, %esp
298
298
deflit(`FRAME',STACK_SPACE)
299
299
        movl    $1, %ecx
494
494
 
495
495
        incl    %edx
496
496
        jnz     L(unroll_outer_top)
497
 
        
 
497
 
498
498
 
499
499
ifelse(OFFSET,0,,`
500
500
        addl    $OFFSET, %esi
633
633
        addl    (%esp), %ecx
634
634
        addl    $L(unroll_inner_end)-L(here)-eval(2*CODE_BYTES_PER_LIMB), %ecx
635
635
        addl    %edx, %ecx
636
 
        ret
 
636
        ret_internal
637
637
')
638
638
 
639
639