home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / lib / mntc6846.zoo / patch / osbind.s < prev    next >
Encoding:
Text File  |  1995-03-29  |  4.9 KB  |  318 lines
  1. *
  2. * new osbind definitions for the MiNT library and c68
  3. * (needed when -notrap option is used)
  4. *
  5.  
  6.  
  7.     .text
  8.     .even
  9.  
  10.  
  11.     .globl    _gemdos
  12.     .globl    __trap_1_
  13. _gemdos:
  14. __trap_1_:
  15.     lea    24(sp),a0    ; 4 bytes for ret addr + 20 for parameters
  16.     move.l    -(a0),-(sp)    ; max. of 20 bytes parameters to trap #1
  17.     move.l    -(a0),-(sp)
  18.     move.l    -(a0),-(sp)
  19.     move.l    -(a0),-(sp)
  20.     move.l    -(a0),-(sp)
  21.     trap    #1        ; go do the trap
  22.     lea    20(sp),sp    ; pop parameters
  23.     rts            ; return
  24.  
  25.  
  26.     .globl    _bios
  27.     .globl    __trap_13_
  28. _bios:
  29. __trap_13_:
  30.     lea    20(sp),a0    ; 4 bytes ret. addr. + 16 bytes parameters
  31.     move.l    -(a0),-(sp)
  32.     move.l    -(a0),-(sp)    ; copy 16 bytes of trap #13 parameters
  33.     move.l    -(a0),-(sp)    ; looks like it only needs 14 bytes max
  34.     move.l    -(a0),-(sp)
  35.     trap    #13        ; go do the trap
  36.     lea    16(sp),sp
  37.     rts
  38.  
  39.  
  40.     .globl    _xbios
  41.     .globl    __trap_14_
  42. _xbios:
  43. __trap_14_:
  44.     lea    32(sp),a0    ; 28 bytes of parameters
  45.     move.l    -(a0),-(sp)    ; copy 28 bytes
  46.     move.l    -(a0),-(sp)    ; looks like only 26 needed
  47.     move.l    -(a0),-(sp)
  48.     move.l    -(a0),-(sp)
  49.     move.l    -(a0),-(sp)
  50.     move.l    -(a0),-(sp)
  51.     move.l    -(a0),-(sp)
  52.     trap    #14        ; go do the trap
  53.     lea    28(sp),sp
  54.     rts
  55.  
  56.  
  57.     .globl    __trap_1_w
  58. __trap_1_w:
  59.     move.w    4(sp),-(sp)
  60.     trap    #1
  61.     addq.l    #2,sp
  62.     rts
  63.  
  64.     .globl    __trap_1_ww
  65. __trap_1_ww:
  66.     move.l    4(sp),-(sp)
  67.     trap    #1
  68.     addq.l    #4,sp
  69.     rts
  70.  
  71.     .globl    __trap_1_wl
  72.     .globl    __trap_1_www
  73. __trap_1_wl:
  74. __trap_1_www:
  75.     move.l    6(sp),-(sp)
  76.     move.w    8(sp),-(sp)
  77.     trap    #1
  78.     addq.l    #6,sp
  79.     rts
  80.  
  81.     .globl    __trap_1_wlw
  82.     .globl    __trap_1_wwl
  83.     .globl    __trap_1_wwww
  84. __trap_1_wlw:
  85. __trap_1_wwl:
  86. __trap_1_wwww:
  87.     move.l    8(sp),-(sp)
  88.     move.l    8(sp),-(sp)
  89.     trap    #1
  90.     addq.l    #8,sp
  91.     rts
  92.  
  93.     .globl    __trap_1_wll
  94.     .globl    __trap_1_wwwl
  95.     .globl    __trap_1_wlww
  96.     .globl    __trap_1_wwlw
  97. __trap_1_wll:
  98. __trap_1_wwwl:
  99. __trap_1_wlww:
  100. __trap_1_wwlw:
  101.     move.l    10(sp),-(sp)
  102.     move.l    10(sp),-(sp)
  103.     move.w    12(sp),-(sp)
  104.     trap    #1
  105.     lea    10(sp),sp
  106.     rts
  107.  
  108.     .globl    __trap_1_wwll
  109.     .globl    __trap_1_wllw
  110. __trap_1_wwll:
  111. __trap_1_wllw:
  112.     move.l    12(sp),-(sp)
  113.     move.l    12(sp),-(sp)
  114.     move.l    12(sp),-(sp)
  115.     trap    #1
  116.     lea    12(sp),sp
  117.     rts
  118.  
  119.     .globl    __trap_1_wwwll
  120. __trap_1_wwwll:
  121.     move.l    14(sp),-(sp)
  122.     move.l    14(sp),-(sp)
  123.     move.l    14(sp),-(sp)
  124.     move.w    16(sp),-(sp)
  125.     trap    #1
  126.     lea    14(sp),sp
  127.     rts
  128.  
  129.     .globl    __trap_1_wwlll
  130. __trap_1_wwlll:
  131.     move.l    16(sp),-(sp)
  132.     move.l    16(sp),-(sp)
  133.     move.l    16(sp),-(sp)
  134.     move.l    16(sp),-(sp)
  135.     trap    #1
  136.     lea    16(sp),sp
  137.     rts
  138.  
  139.     .globl    __trap_1_wwllll
  140. __trap_1_wwllll:
  141.     move.l    20(sp),-(sp)
  142.     move.l    20(sp),-(sp)
  143.     move.l    20(sp),-(sp)
  144.     move.l    20(sp),-(sp)
  145.     move.l    20(sp),-(sp)
  146.     trap    #1
  147.     lea    20(sp),sp
  148.     rts
  149.  
  150.  
  151.     .globl    __trap_13_w
  152. __trap_13_w:
  153.     move.w    4(sp),-(sp)
  154.     trap    #13
  155.     addq.l    #2,sp
  156.     rts
  157.  
  158.     .globl    __trap_13_ww
  159. __trap_13_ww:
  160.     move.l    4(sp),-(sp)
  161.     trap    #13
  162.     addq.l    #4,sp
  163.     rts
  164.  
  165.     .globl    __trap_13_wl
  166.     .globl    __trap_13_www
  167. __trap_13_wl:
  168. __trap_13_www:
  169.     move.l    6(sp),-(sp)
  170.     move.w    8(sp),-(sp)
  171.     trap    #13
  172.     addq.l    #6,sp
  173.     rts
  174.  
  175.     .globl    __trap_13_wwl
  176. __trap_13_wwl:
  177.     move.l    8(sp),-(sp)
  178.     move.l    8(sp),-(sp)
  179.     trap    #13
  180.     addq.l    #8,sp
  181.     rts
  182.  
  183.     .globl    __trap_13_wwlwww
  184. __trap_13_wwlwww:
  185.     move.l    14(sp),-(sp)
  186.     move.l    14(sp),-(sp)
  187.     move.l    14(sp),-(sp)
  188.     move.w    16(sp),-(sp)
  189.     trap    #13
  190.     lea    14(sp),sp
  191.     rts
  192.  
  193.  
  194.     .globl    __trap_14_w
  195. __trap_14_w:
  196.     move.w    4(sp),-(sp)
  197.     trap    #14
  198.     addq.l    #2,sp
  199.     rts
  200.  
  201.     .globl    __trap_14_ww
  202. __trap_14_ww:
  203.     move.l    4(sp),-(sp)
  204.     trap    #14
  205.     addq.l    #4,sp
  206.     rts
  207.  
  208.     .globl    __trap_14_wl
  209.     .globl    __trap_14_www
  210. __trap_14_wl:
  211. __trap_14_www:
  212.     move.l    6(sp),-(sp)
  213.     move.w    8(sp),-(sp)
  214.     trap    #14
  215.     addq.l    #6,sp
  216.     rts
  217.  
  218.     .globl    __trap_14_wwl
  219. __trap_14_wwl:
  220.     move.l    8(sp),-(sp)
  221.     move.l    8(sp),-(sp)
  222.     trap    #14
  223.     addq.l    #8,sp
  224.     rts
  225.  
  226.     .globl    __trap_14_wwwl
  227.     .globl    __trap_14_wll
  228. __trap_14_wwwl:
  229. __trap_14_wll:
  230.     move.l    10(sp),-(sp)
  231.     move.l    10(sp),-(sp)
  232.     move.w    12(sp),-(sp)
  233.     trap    #14
  234.     lea    10(sp),sp
  235.     rts
  236.  
  237.     .globl    __trap_14_wwll
  238.     .globl    __trap_14_wlwl
  239.     .globl    __trap_14_wllw
  240.     .globl    __trap_14_wwwwl
  241.     .globl    __trap_14_wwwwww
  242. __trap_14_wwll:
  243. __trap_14_wlwl:
  244. __trap_14_wllw:
  245. __trap_14_wwwwl:
  246. __trap_14_wwwwww:
  247.     move.l    12(sp),-(sp)
  248.     move.l    12(sp),-(sp)
  249.     move.l    12(sp),-(sp)
  250.     trap    #14
  251.     lea    12(sp),sp
  252.     rts
  253.  
  254.     .globl    __trap_14_wlll
  255.     .globl    __trap_14_wllww
  256.     .globl    __trap_14_wlwlw
  257.     .globl    __trap_14_wwwwwww
  258. __trap_14_wlll:
  259. __trap_14_wllww:
  260. __trap_14_wlwlw:
  261. __trap_14_wwwwwww:
  262.     move.l    14(sp),-(sp)
  263.     move.l    14(sp),-(sp)
  264.     move.l    14(sp),-(sp)
  265.     move.w    16(sp),-(sp)
  266.     trap    #14
  267.     lea    14(sp),sp
  268.     rts
  269.  
  270.     .globl    __trap_14_wllll
  271. __trap_14_wllll:
  272.     move.l    18(sp),-(sp)
  273.     move.l    18(sp),-(sp)
  274.     move.l    18(sp),-(sp)
  275.     move.l    18(sp),-(sp)
  276.     move.w    20(sp),-(sp)
  277.     trap    #14
  278.     lea    18(sp),sp
  279.     rts
  280.  
  281.     .globl    __trap_14_wllwwwww
  282. __trap_14_wllwwwww:
  283.     move.l    20(sp),-(sp)
  284.     move.l    20(sp),-(sp)
  285.     move.l    20(sp),-(sp)
  286.     move.l    20(sp),-(sp)
  287.     move.l    20(sp),-(sp)
  288.     trap    #14
  289.     lea    20(sp),sp
  290.     rts
  291.  
  292.     .globl    __trap_14_wllwwwwlw
  293. __trap_14_wllwwwwlw:
  294.     move.l    24(sp),-(sp)
  295.     move.l    24(sp),-(sp)
  296.     move.l    24(sp),-(sp)
  297.     move.l    24(sp),-(sp)
  298.     move.l    24(sp),-(sp)
  299.     move.l    24(sp),-(sp)
  300.     trap    #14
  301.     lea    24(sp),sp
  302.     rts
  303.  
  304.     .globl    __trap_14_wllwwwwwlw
  305.     .globl    __trap_14_wllllll
  306. __trap_14_wllwwwwwlw:
  307. __trap_14_wllllll:
  308.     move.l    26(sp), -(sp)
  309.     move.l    26(sp), -(sp)
  310.     move.l    26(sp), -(sp)
  311.     move.l    26(sp), -(sp)
  312.     move.l    26(sp), -(sp)
  313.     move.l    26(sp), -(sp)
  314.     move.w    28(sp), -(sp)
  315.     trap    #14
  316.     lea    26(sp), sp
  317.     rts
  318.