.TITLE ABRT Abort Task .IDENT "V1.1" .ENABL LC .PSECT C$CODE ;+ ; Index ABRT Abort Task ; ; Usage ; ; #include ; rad50 tsknam[2]; /* 2 word RAD50 task name */ ; word status; /* Returned $DSW */ ; ; status = abrt(tsknam); ; ; [end] ;- ; Edits: ; V1.1 19-Oct-82 RBD Change P-sects. Fix documentation; ; .mcall abrt$s abrt:: mov 2(sp),r0 abrt$s r0 mov $dsw,r0 return .end