.TITLE CNCT Connect to Task .IDENT "V1.1" .ENABL LC .PSECT C$CODE ;+ ; Index CNCT Connect to Task ; ; Usage ; ; #include ; rad50 tsknam[2]; /* Offspring task name */ ; word eflag; /* Event flag number */ ; {typ} astsrv(); /* AST service routine */ ; word esb[8]; /* 8 word status block */ ; word status; /* Returned DSW */ ; ; status = cnct(tsknam, eflag, astsrv, esb) ; ; [end] ;- ; Edits: ; V1.0 12-Jun-80 RBD Initial Edit ; V1.1 19-Oct-82 RBD Change P-Section. Fix Documentation. ; .mcall cnct$s cnct:: mov sp,r0 ;r0 --> parameters stack frame cnct$s 2(r0),4(r0),6(r0),10(r0) mov $dsw,r0 ;return DSW return .end