.TITLE SDRC Send, Request and Connect .IDENT "V1.0" .ENABL LC .PSECT C$CODE ;+ ; Index SDRC Send, Request and Connect ; ; ; Usage ; ; #include ; rad50 tname[2]; /* Offspring task name */ ; word msgbuf[13]; /* 13-word buffer to send */ ; word efn; /* Event flag */ ; {typ}astsrv(); /* AST service routine */ ; word esb[8]; /* Exit status block */ ; word status; /* Returned DSW */ ; ; status = sdrc(tname, msgbuf, efn, astsrv, esb); ; ; Notes ; ; Only the 1st word of the ESB is used. ; [end] ;- ; Edits: ; V1.0 20-Oct-82 RBD Initial edit ; .mcall sdrc$s sdrc:: mov sp,r0 ; r0 --> calling stack sdrc$s 2(r0),4(r0),6(r0),10(r0),12(r0) mov $dsw,r0 ; Return DSW return .end