view src/parallel_execution/Queue.cbc @ 401:408b4aab7610

Supported par goto iterate statement for perl script
author Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp>
date Tue, 29 Aug 2017 21:50:57 +0900
parents fb50cf8aa615
children
line wrap: on
line source

typedef struct Queue<Impl>{
        union Data* queue;
        union Data* data;
        __code whenEmpty(...);
        __code clear(Impl* queue, __code next(...));
        __code put(Impl* queue, union Data* data, __code next(...));
        __code take(Impl* queue, __code next(union Data*, ...));
        __code isEmpty(Impl* queue, __code next(...), __code whenEmpty(...));
        __code next(...);
} Queue;