1: / C library -- chown 2: 3: / error = chown(string, owner); 4: 5: .globl _chown, cerror 6: 7: _chown: 8: mov r5,-(sp) 9: mov sp,r5 10: mov 4(r5),0f 11: mov 6(r5),0f+2 12: sys 0; 9f 13: bec 1f 14: jmp cerror 15: 1: 16: clr r0 17: mov (sp)+,r5 18: rts pc 19: .data 20: 9: 21: sys chown; 0:..; ..