arch/m68k-all/libgcc1/_negdf2.s

   1 | double floating point negation routine
   2 |
   3 | written by Kai-Uwe Bloem (I5110401@dbstu1.bitnet).
   4 | Based on a 80x86 floating point packet from comp.os.minix, written by P.Housel
   5 |
   6 |
   7 | Revision 1.1, kub 12-89 :
   8 | Ported over to 68k assembler
   9 |
  10 | Revision 1.0:
  11 | original 8088 code from P.S.Housel
  12
  13         .text
  14         .even
  15         .globl  __negdf2
  16
  17 __negdf2:                       | floating point negate
  18         movel   %sp@(4),%d0     | do not negate if operand is 0.0
  19         orl     %sp@(8),%d0
  20         moveml  %sp@(4),%d0-%d1 | get number
  21         beq     L_1
  22         eorl    #0x80000000,%d0 | flip sign bit
  23 L_1:    rts