pipe.s 203 B

12345678910111213141516
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .sect .text
  3. pipe = 42
  4. .define _pipe
  5. _pipe:
  6. .data2 0x0000
  7. chmk $pipe
  8. bcc 1f
  9. jmp cerror
  10. 1:
  11. movl 4(ap),r2
  12. movl r0,(r2)+
  13. movl r1,(r2)
  14. clrl r0
  15. ret