Added fakethr.h.
[p5sagit/p5-mst-13.2.git] / fakethr.h
1 typedef int perl_mutex;
2 typedef int perl_key;
3
4 struct perl_wait_queue {
5     struct thread *             thread;
6     struct perl_wait_queue *    next;
7 };
8 typedef struct perl_wait_queue *perl_cond;
9
10 struct thread_intern {
11     perl_thread next_run, prev_run;     /* Linked list of runnable threads */
12     perl_cond   wait_queue;             /* Wait queue that we are waiting on */
13     IV          private;                /* Holds data across time slices */
14     I32         savemark;               /* Holds MARK for thread join values */
15 };