.TITLE VSDA Variable Send Data .IDENT "V42.2" .ENABL LC .PSECT C$CODE ;+ ; Index VSDA Variable Send DAta ; ; Usage ; ; #include ; #define BUFWDS ??? /* number of words in your receive buffer */ ; rad50 rectsk[2]; /* 2 word RAD50 task name */ ; word buffer[BUFWDS]; /* Received data packet */ ; word bufwds; /* number of words in your receive buffer */ ; word efn; /* event flag number to use : 0 means none */ ; word status; /* Returned DSW */ ; efn = ???; ; bufwds = BUFWDS; ; ; status = vsda(rectsk, buffer, bufwds, efn); ; ; [end] ;- ; Edits: ; V42.1 26-Sep-84 DLE Initial Edit ; V42.2 16-Jun-85 DLE Fix much cruft; no external change. ; .mcall vsda$s vsda:: mov sp,r0 ;save arg frame pointer vsda$s 2(r0),4(r0),6(r0),8.(r0) ;send variable data to task with efn mov $dsw,r0 ;return DSW return .end ; vsda.mac