.title exttsk .nlist bex ; ; PDP-11 C ; Stdio. ; ; Extend task. ; .globl exttsk .mcall extk$s ; ; Extend task. ; ; This C callable routine is used to extend the calling task by the ; specified number of core clicks. ; ; C call: ; int i; ; exttsk(i); ; ; Returns 0 if all ok, or -1 on error ; .psect .prog. con exttsk: jsr r0,$save extk$s 12(r5) bcc 10$ mov #-1,r0 br 20$ 10$: clr r0 20$: jmp $ret .end