dup.s 210 B

123456789101112131415161718
  1. .define _dup
  2. .define _dup2
  3. .sect .text
  4. .sect .rom
  5. .sect .data
  6. .sect .bss
  7. .sect .text
  8. .extern _dup
  9. .sect .text
  10. .extern _dup2
  11. _dup2: or.l #64,4(sp)
  12. _dup: trap #0
  13. .data2 0x29
  14. bcc 1f
  15. jmp cerror
  16. 1:
  17. rts