Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. /*
  2.  * Written by J.T. Conklin <jtc@netbsd.org>.
  3.  * Public domain.
  4.  */
  5.  
  6.         .file   "copysignf.S"
  7.         .text
  8.         .align 4
  9. .globl _copysignf
  10.         .def    _copysignf;     .scl    2;      .type   32;     .endef
  11. _copysignf:
  12.         movl    8(%esp),%edx
  13.         movl    4(%esp),%eax
  14.         andl    $0x80000000,%edx
  15.         andl    $0x7fffffff,%eax
  16.         orl     %edx,%eax
  17.         movl    %eax,4(%esp)
  18.         flds    4(%esp)
  19.         ret
  20.