lib/libc/ack/math/frexp.s

   1 #
   2 .sect .text; .sect .rom; .sect .data; .sect .bss
   3 .extern _frexp
   4 .sect .text
   5 _frexp:
   6 #if __i386
   7         push    ebp
   8         mov     ebp, esp
   9         push    12(ebp)
  10         push    8(ebp)
  11         mov     eax, esp
  12         add     eax, -4
  13         push    eax
  14         call    .fef8
  15         mov     eax, 16(ebp)
  16         pop     (eax)
  17         pop     eax
  18         pop     edx
  19         leave
  20         ret
  21 #else /* i86 */
  22         push    bp
  23         mov     bp, sp
  24         lea     bx, 4(bp)
  25         mov     cx, #8
  26         call    .loi
  27         mov     ax, sp
  28         add     ax, #-2
  29         push    ax
  30         call    .fef8
  31         mov     bx, 12(bp)
  32         pop     (bx)
  33         call    .ret8
  34         jmp     .cret
  35 #endif