mach/sun3/libce/sbf8.s

   1 .sect .text; .sect .rom; .sect .data; .sect .bss
   2 .sect .text
   3 .define sbf8
   4 sbf8:
   5         move.l  (sp)+,a1
   6         lea     (8,sp),a0
   7         move.l  (a0),d0
   8         move.l  (4,a0),d1
   9         move.l  (sp)+,(a0)
  10         move.l  (sp)+,(4,a0)
  11         move.l  a1,-(sp)
  12         jsr     (Fsubd)
  13         move.l  d0,(4,sp)
  14         move.l  d1,(8,sp)
  15         rts