Add original unix v6
This commit is contained in:
@@ -0,0 +1,13 @@
|
||||
.globl .f
|
||||
.globl succ
|
||||
.globl seekchar,getword
|
||||
|
||||
.f:
|
||||
mov (sp),r0
|
||||
mov r0,6(sp)
|
||||
mov 4(sp),r1
|
||||
jsr pc,seekchar
|
||||
jsr pc,getword
|
||||
mov r0,(sp)
|
||||
mov $-1,2(sp)
|
||||
jmp succ
|
||||
Reference in New Issue
Block a user