Mercurial > hg > Gears > GearsAgda
view src/parallel_execution/Queue.cbc @ 266:ffcd80cc3a83
create SingleLinkedQueue.cbc
author | mir3636 |
---|---|
date | Sat, 28 Jan 2017 23:12:44 +0900 |
parents | |
children | fd470e090403 |
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(...); } Stack;