| 1 | #ifndef GEN_ALLOC_DEFS_H |
| 2 | #define GEN_ALLOC_DEFS_H |
| 3 | |
| 4 | #define GEN_ALLOC_ready(ta,type,field,len,a,i,n,x,base,ta_ready) \ |
| 5 | int ta_ready(x,n) register ta *x; register unsigned int n; \ |
| 6 | { register unsigned int i; \ |
| 7 | if (x->field) { \ |
| 8 | i = x->a; \ |
| 9 | if (n > i) { \ |
| 10 | x->a = base + n + (n >> 3); \ |
| 11 | if (alloc_re(&x->field,i * sizeof(type),x->a * sizeof(type))) return 1; \ |
| 12 | x->a = i; return 0; } \ |
| 13 | return 1; } \ |
| 14 | x->len = 0; \ |
| 15 | return !!(x->field = (type *) alloc((x->a = n) * sizeof(type))); } |
| 16 | |
| 17 | #define GEN_ALLOC_readyplus(ta,type,field,len,a,i,n,x,base,ta_rplus) \ |
| 18 | int ta_rplus(x,n) register ta *x; register unsigned int n; \ |
| 19 | { register unsigned int i; \ |
| 20 | if (x->field) { \ |
| 21 | i = x->a; n += x->len; \ |
| 22 | if (n > i) { \ |
| 23 | x->a = base + n + (n >> 3); \ |
| 24 | if (alloc_re(&x->field,i * sizeof(type),x->a * sizeof(type))) return 1; \ |
| 25 | x->a = i; return 0; } \ |
| 26 | return 1; } \ |
| 27 | x->len = 0; \ |
| 28 | return !!(x->field = (type *) alloc((x->a = n) * sizeof(type))); } |
| 29 | |
| 30 | #define GEN_ALLOC_append(ta,type,field,len,a,i,n,x,base,ta_rplus,ta_append) \ |
| 31 | int ta_append(x,i) register ta *x; register type *i; \ |
| 32 | { if (!ta_rplus(x,1)) return 0; x->field[x->len++] = *i; return 1; } |
| 33 | |
| 34 | #endif |