.define __fork
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
.extern __fork
__fork:		trap #0
.data2 0x2
		bra 3f
		rts
3:
		bcc 2f
		jmp cerror
2:
		clr.l d0
		rts