home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / pcosbind.zoo / source.zoo / fgetchar.s < prev    next >
Text File  |  1992-06-22  |  203b  |  13 lines
  1. ;long Fgetchar(int f, int mode);            /* GEMDOS 0x107 */
  2.  
  3. .export Fgetchar
  4. Fgetchar:
  5. move.l a2,-(sp)
  6. move.w d1,-(sp)
  7. move.w d0,-(sp)
  8. move.w #$107,-(sp)
  9. trap #1
  10. addq.l #6,sp
  11. movea.l (sp)+,a2
  12. rts
  13.