home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / pcosbind.zoo / source.zoo / pgetpid.s < prev    next >
Text File  |  1992-06-22  |  158b  |  11 lines
  1. ;int Pgetpid( void );                    /* GEMDOS 0x10b */
  2.  
  3. .export Pgetpid
  4. Pgetpid:
  5. move.l a2,-(sp)
  6. move.w #$10b,-(sp)
  7. trap #1
  8. addq.l #2,sp
  9. movea.l (sp)+,a2
  10. rts
  11.