any.s

UNIX v6源代码 这几乎是最经典的unix版本 unix操作系统设计和莱昂氏unix源代码分析都是用的该版

i = r3
f = r5
.globl x,j
.globl succ,fail
.globl	ctest,iget
.globl any

any:
	mov	j(f),-(sp)
	jsr	pc,iget
	jsr	pc,ctest
	bcs	1f
	mov	(sp)+,j(f)
	jmp	fail
1:
	tst	(sp)+
	jmp	succ