| 1 |
e2068500
|
Temesghen Kahsai
|
|
| 2 |
|
|
#ifndef _ARROW
|
| 3 |
|
|
#define _ARROW
|
| 4 |
|
|
|
| 5 |
|
|
struct _arrow_mem {struct _arrow_reg {_Bool _first; } _reg; };
|
| 6 |
|
|
|
| 7 |
|
|
extern struct _arrow_mem *_arrow_alloc ();
|
| 8 |
|
|
|
| 9 |
|
|
#define _arrow_DECLARE(attr, inst)\
|
| 10 |
|
|
attr struct _arrow_mem inst;
|
| 11 |
|
|
|
| 12 |
|
|
#define _arrow_LINK(inst) do {\
|
| 13 |
|
|
;\
|
| 14 |
|
|
} while (0)
|
| 15 |
|
|
|
| 16 |
|
|
#define _arrow_ALLOC(attr, inst)\
|
| 17 |
|
|
_arrow_DECLARE(attr, inst);\
|
| 18 |
|
|
_arrow_LINK(inst)
|
| 19 |
|
|
|
| 20 |
3b2bd83d
|
Teme
|
#define _arrow_init(self) {}
|
| 21 |
|
|
|
| 22 |
|
|
#define _arrow_clear(self) {}
|
| 23 |
|
|
|
| 24 |
e2068500
|
Temesghen Kahsai
|
#define _arrow_step(x,y,output,self) ((self)->_reg._first?((self)->_reg._first=0,(*output = x)):(*output = y))
|
| 25 |
|
|
|
| 26 |
|
|
#define _arrow_reset(self) {(self)->_reg._first = 1;}
|
| 27 |
|
|
|
| 28 |
|
|
/* Step macro for specialized arrows of the form: (true -> false) */
|
| 29 |
|
|
|
| 30 |
|
|
#define _once_step(output,self) { *output = (self)->_reg._first; if ((self)->_reg._first) { (self)->_reg._first=0; }; }
|
| 31 |
|
|
|
| 32 |
|
|
#endif
|