~ubuntu-branches/ubuntu/raring/avr-libc/raring-proposed

« back to all changes in this revision

Viewing changes to libm/fplib/mulsf3.S

  • Committer: Bazaar Package Importer
  • Author(s): Hakan Ardo
  • Date: 2008-08-10 09:59:16 UTC
  • mfrom: (1.2.1 upstream) (8 intrepid)
  • mto: (4.1.7 sid)
  • mto: This revision was merged to the branch mainline in revision 9.
  • Revision ID: james.westby@ubuntu.com-20080810095916-7ku06pjsfia3hz16
Added build-depends on texlive-extra-utils (closes: #493454)

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*  -*- Mode: Asm -*-  */
2
 
 
3
1
/* Copyright (c) 2002  Michael Stumpf  <mistumpf@de.pepperl-fuchs.com>
 
2
   Copyright (c) 2006  Dmitry Xmelkov
4
3
   All rights reserved.
5
4
 
6
 
 
7
5
   Redistribution and use in source and binary forms, with or without
8
6
   modification, are permitted provided that the following conditions are met:
9
7
 
10
8
   * Redistributions of source code must retain the above copyright
11
9
     notice, this list of conditions and the following disclaimer.
12
 
   
13
10
   * Redistributions in binary form must reproduce the above copyright
14
11
     notice, this list of conditions and the following disclaimer in
15
12
     the documentation and/or other materials provided with the
16
13
     distribution.
17
 
     
18
14
   * Neither the name of the copyright holders nor the names of
19
15
     contributors may be used to endorse or promote products derived
20
16
     from this software without specific prior written permission.
29
25
   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30
26
   CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31
27
   ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32
 
   POSSIBILITY OF SUCH DAMAGE. 
33
 
*/
34
 
 
35
 
/* $Id: mulsf3.S,v 1.4.2.1 2005/12/06 20:47:49 aesok Exp $ */
36
 
 
37
 
/*
38
 
    mulsf3.S is part of     FPlib V 0.3.0       ported to avr-as
39
 
    for details see readme.fplib
40
 
 
41
 
 *----------------------------------------------------------------------------------------
42
 
 *  res(A) = A * B
43
 
 */
44
 
 
45
 
#include "gasava.inc"
46
 
#include "macros.inc"
47
 
#include "fplib.inc"
48
 
 
49
 
          TEXT_SEG(fplib, __mulsf3)
50
 
          FUNCTION(__mulsf3)
51
 
 
52
 
GLOBAL(__mulsf3)
53
 
     RCALL   _U(__fp_split3)    ; split up in sign:exponent:fraction:fraction extention
54
 
     RCALL   _U(__mulsf3x)
55
 
     RJMP    _U(__fp_merge)
56
 
 
57
 
          ENDFUNC
58
 
 
59
 
 
 
28
   POSSIBILITY OF SUCH DAMAGE. */
 
29
 
 
30
/* $Id: mulsf3.S,v 1.6 2007/01/14 15:11:40 dmix Exp $ */
 
31
 
 
32
#include "fp32def.h"
 
33
#include "asmdef.h"
 
34
 
 
35
ENTRY   __mulsf3
 
36
        rcall   _U(__mulsf3x)
 
37
        rjmp    _U(__fp_round)
 
38
ENDFUNC