getpid.s 225 B

123456789101112131415161718
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .sect .text
  3. .define _getpid
  4. .define _getppid
  5. getpid = 20
  6. .align 1
  7. _getpid:
  8. .data2 0x0000
  9. chmk $getpid
  10. ret
  11. .align 1
  12. _getppid:
  13. .data2 0x0000
  14. chmk $getpid
  15. movl r1,r0
  16. ret