.TITLE ALTP Alter Priority .IDENT "V1.1" .ENABL LC .PSECT C$CODE ;+ ; Index ALTP Alter Priority ; ; Usage ; #include ; word nprio; /* New priority 1-250 decimal */ ; rad50 tsknam[2]; /* 2 word RAD50 task name */ ; word status; /* Returned DSW */ ; ; status = altp(tsknam, nprio) /* Returns DSW */ ; ; [end] ;- ; Edits: ; V1.1 19-Oct-82 RBD Change P-Sections. Fix documentation. ; .mcall altp$s altp:: mov sp,r0 altp$s 2(r0),4(r0) mov $dsw,r0 return .end