home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 8 / FreshFishVol8-CD1.bin / useful / util / libs / reqtools / glue / gcc / gcc_glue.lha / src / LibSource.lha / rtGetString.S < prev    next >
Encoding:
Text File  |  1994-02-01  |  216 b   |  17 lines
  1.  
  2. #include "reqtools.i"
  3.  
  4.     .globl _rtGetString
  5.  
  6.     .text
  7.  
  8. _rtGetString:
  9.     moveml    a2/a3/a6,sp@-
  10.     GETRTBASE
  11.     lea    sp@(32),a0
  12.     moveml    sp@(20),d0/a2/a3
  13.     movel    sp@(16),a1
  14.     jsr    a6@(_LVOrtGetStringA:W)
  15.     moveml    sp@+,a2/a3/a6
  16.     rts
  17.