home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / disks / disk403.lzh / RexxHostLib / Glue.LZH / GetToken.asm < prev    next >
Assembly Source File  |  1990-09-18  |  202b  |  16 lines
  1.     xref    _RexxHostBase
  2.     xdef    _GetToken
  3.  
  4.     section    text,code
  5.  
  6. _GetToken:
  7.     movem.l    a6/a2,-(sp)
  8.     move.l    _RexxHostBase,a6
  9.     movem.l    12(sp),a0/a1/a2
  10.     move.l    24(sp),d0
  11.     jsr    -84(a6)
  12.     movem.l    (sp)+,a6/a2
  13.     rts
  14.  
  15.     end
  16.