← Back to branch summary

~mingw-w64/mingw-w64/experimental

« back to all changes in this revision

Viewing changes to ros-privexp/mingw-w64-crt/math/ceilf.S

  • Committer: NightStrike
  • Date: 2010-08-11 22:20:57 UTC
  • Revision ID: svn-v4:4407c894-4637-0410-b4f5-ada5f102cad1:experimental:3266
Branch for adding option for supporting ros

Show diffs side-by-side

added added

removed removed

Lines of Context:
ros-privexp/mingw-w64-crt/math/ceilf.S
 
1
/**
 
2
 * This file has no copyright assigned and is placed in the Public Domain.
 
3
 * This file is part of the w64 mingw-runtime package.
 
4
 * No warranty is given; refer to the file DISCLAIMER.PD within this package.
 
5
 */
 
6
#include <_mingw_mac.h>
 
7
 
 
8
        .file   "ceilf.S"
 
9
        .text
 
10
        .align 4
 
11
.globl __MINGW_USYMBOL(ceilf)
 
12
        .def    __MINGW_USYMBOL(ceilf); .scl    2;      .type   32;     .endef
 
13
__MINGW_USYMBOL(ceilf):
 
14
#ifdef _WIN64
 
15
        subq    $24,%rsp
 
16
        movss   %xmm0,8(%rsp)
 
17
        flds    8(%rsp)
 
18
 
 
19
        fstcw   4(%rsp)                 /* store fpu control word */
 
20
 
 
21
        movl    $0x0800,%edx            /* round towards +oo */
 
22
        orl     4(%rsp),%edx
 
23
        andl    $0xfbff,%edx
 
24
        movl    %edx,(%rsp)
 
25
        fldcw   (%rsp)                  /* load modified control word */
 
26
 
 
27
        frndint                         /* round */
 
28
 
 
29
        fldcw   4(%rsp)                 /* restore original control word */
 
30
        fstps   8(%rsp)
 
31
        movss   8(%rsp),%xmm0
 
32
        addq    $24,%rsp
 
33
        ret
 
34
#else
 
35
        flds    4(%esp)
 
36
        subl    $8,%esp
 
37
 
 
38
        fstcw   4(%esp)                 /* store fpu control word */
 
39
 
 
40
        /* We use here %edx although only the low 1 bits are defined.
 
41
           But none of the operations should care and they are faster
 
42
           than the 16 bit operations.  */
 
43
        movl    $0x0800,%edx            /* round towards +oo */
 
44
        orl     4(%esp),%edx
 
45
        andl    $0xfbff,%edx
 
46
        movl    %edx,(%esp)
 
47
        fldcw   (%esp)                  /* load modified control word */
 
48
 
 
49
        frndint                         /* round */
 
50
 
 
51
        fldcw   4(%esp)                 /* restore original control word */
 
52
 
 
53
        addl    $8,%esp
 
54
        ret
 
55
#endif