home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / gcc / ixemulsrc.lha / ixemul / stack / link_a5_d0_f.c < prev    next >
C/C++ Source or Header  |  1996-12-11  |  413b  |  33 lines
  1. #include "a4.h"        /* for the A4 macro */
  2.  
  3. asm("
  4.     .text
  5.     .even
  6.     .globl    ___link_a5_d0_f
  7.     .globl    ___sub_d0_sp_f
  8.  
  9. ___link_a5_d0_f:
  10.     movel    sp@+,a0
  11.     movel    sp,d1
  12.     subl    d0,d1
  13.     cmpl    "A4(___stk_limit)",d1
  14.     jcc    l0
  15.     jbsr    l2
  16. l0:    link    a5,#0:W
  17.     subl    d0,sp
  18.     jmp    a0@
  19.  
  20. ___sub_d0_sp_f:
  21.     movel    sp@+,a0
  22.     movel    sp,d1
  23.     subl    d0,d1
  24.     cmpl    "A4(___stk_limit)",d1
  25.     jcc    l1
  26.     jbsr    l2
  27. l1:    subl    d0,sp
  28.     jmp    a0@
  29.  
  30. l2:    moveq    #0,d1
  31.     jra    ___stkext_f
  32. ");
  33.