ack/mach/z8000/libem/gto.s

.define gto
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text

gto:
	pop	R3, *RR14
	ld	R13, 4(R3)
	ld	R15, 2(R3)
	ld	R3, 0(R3)
	jp	0(R3)
* empty log message * 1985-01-08 11:48:43 +00:00			`.define gto`
new version for new assembler syntax 1987-01-19 10:51:50 +00:00			`.sect .text`
			`.sect .rom`
			`.sect .data`
			`.sect .bss`
			`.sect .text`
* empty log message * 1985-01-08 11:48:43 +00:00
			`gto:`
			`pop R3, *RR14`
			`ld R13, 4(R3)`
			`ld R15, 2(R3)`
			`ld R3, 0(R3)`
			`jp 0(R3)`