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   "remainderf.S"
  7.         .text
  8.         .align 4
  9. .globl _remainder
  10.         .def    _remainderf;    .scl    2;      .type   32;     .endef
  11. _remainderf:
  12.         flds    8(%esp)
  13.         flds    4(%esp)
  14. 1:      fprem1
  15.         fstsw   %ax
  16.         sahf
  17.         jp      1b
  18.         fstp    %st(1)
  19.         ret
  20.