1/* struct::queue - critcl - layer 1 declarations
2 * (a) Data structures.
3 */
4
5#ifndef _DS_H
6#define _DS_H 1
7
8#include "tcl.h"
9
10/* Forward declarations of references to queues.
11 */
12
13typedef struct Q* QPtr;
14
15/* Queue structure
16 */
17
18typedef struct Q {
19    Tcl_Command cmd; /* Token of the object command for
20		      * the queue */
21    Tcl_Obj* unget;  /* List object unget elements */
22    Tcl_Obj* queue;  /* List object holding the main queue */
23    Tcl_Obj* append; /* List object holding new elements */
24    int at;          /* Index of next element to return from the main queue */
25} Q;
26
27#endif /* _DS_H */
28
29/*
30 * Local Variables:
31 * mode: c
32 * c-basic-offset: 4
33 * fill-column: 78
34 * End:
35 */
36