home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 390.lha / RexxHostLibrary_v34.12 / glue / GetToken.asm < prev    next >
Encoding:
Assembly Source File  |  1990-07-01  |  209 b   |  17 lines
  1. ;:ts=8
  2.  
  3.     section    text,code
  4.  
  5.     xref    _RexxHostBase
  6.     xdef    _GetToken
  7. _GetToken:
  8.     movem.l    a6/a2,-(sp)
  9.     move.l    _RexxHostBase,a6
  10.     movem.l    12(sp),a0/a1/a2
  11.     move.l    24(sp),d0
  12.     jsr    -84(a6)
  13.     movem.l    (sp)+,a6/a2
  14.     rts
  15.  
  16.     end
  17.