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   "copysign.S"
  7.         .text
  8.         .align 4
  9. .globl _copysign
  10.         .def    _copysign;      .scl    2;      .type   32;     .endef
  11. _copysign:
  12.         movl    16(%esp),%edx
  13.         movl    8(%esp),%eax
  14.         andl    $0x80000000,%edx
  15.         andl    $0x7fffffff,%eax
  16.         orl     %edx,%eax
  17.         movl    %eax,8(%esp)
  18.         fldl    4(%esp)
  19.         ret
  20.