mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 00:14:25 +00:00
40 lines
896 B
Plaintext
40 lines
896 B
Plaintext
|
||
/* Queue Descriptor */
|
||
|
||
dcl qnamsiz lit '8';
|
||
|
||
dcl qd$structure lit 'structure(
|
||
link word,
|
||
net byte,
|
||
org byte,
|
||
flags word,
|
||
name(qnamsiz) byte,
|
||
msglen word,
|
||
nmsgs word,
|
||
dq word,
|
||
nq word,
|
||
msgcnt word,
|
||
msgout word,
|
||
buffer word)';
|
||
|
||
/* queue flag values */
|
||
|
||
dcl qf$mx lit '001h'; /* Mutual Exclusion */
|
||
dcl qf$keep lit '002h'; /* NO DELETE */
|
||
dcl qf$hide lit '004h'; /* Not User writable */
|
||
dcl qf$rsp lit '008h'; /* rsp queue */
|
||
dcl qf$table lit '010h'; /* from qd table */
|
||
dcl qf$rpl lit '020h'; /* rpl queue */
|
||
dcl qf$dev lit '040h'; /* device queue */
|
||
|
||
/* Queue Parameter Block */
|
||
|
||
dcl qpb$structure lit 'structure(
|
||
flgs byte,
|
||
net byte,
|
||
qaddr word,
|
||
nmsgs word,
|
||
buffptr word,
|
||
name (qnamsiz) byte )';
|
||
|
||
|