.TITLE WTLO Wait for Logical-OR of Event Flags .IDENT "V1.2" .ENABL LC .PSECT C$CODE ;+ ; Index WTLO Wait for Logical-OR of Event Flags ; ; ; Usage ; ; #include ; word msk; /* 16 bit mask word */ ; word status; /* Returned DSW */ ; ; status = wtlo0(grp, msk); /* Wait on flags 1-16 */ ; status = wtlo1(grp, msk); /* Wait on flags 17-32 */ ; status = wtlo2(grp, msk); /* Wait on flags 33-48 */ ; status = wtlo3(grp, msk); /* Wait on flags 49-64 */ ; status = wtlo4(grp, msk); /* Wait on flags 65-80 */ ; status = wtlo5(grp, msk); /* Wait on flags 81-96 */ ; ; ; Notes ; ; DEC chose not to make the grp parameter a variable. It is set at ; assembly time regardless of the form of the macro used. Therefore, ; there are 6 separate entries for wtlo, one per group. ; ; [end] ;- ; Edits: ; V1.0 12-Jun-82 RBD Initial Edit ; V1.1 ??-???-?? MM Group 4 fails on macro expansion on V3.2 ; V1.2 20-Oct-82 RBD Change P-Sections. Fix documentation. Re-enable ; Group 4 for V4.0. ; .mcall wtlo$s wtlo0:: mov 2(sp),r0 ;r0 = mask wtlo$s 0,r0 br fin wtlo1:: mov 2(sp),r0 ;r0 = mask wtlo$s 1,r0 br fin wtlo2:: mov 2(sp),r0 ;r0 = mask wtlo$s 2,r0 br fin wtlo3:: mov 2(sp),r0 ;r0 = mask wtlo$s 3,r0 br fin wtlo4:: mov 2(sp),r0 ;r0 = mask wtlo$s 4,r0 br fin wtlo5:: mov 2(sp),r0 ;r0 = mask wtlo$s 5,r0 fin: mov $dsw,r0 ;return dsw return .end