Branch: Tag:

1998-03-27

1998-03-27 23:14:41 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

bugfix

Rev: bin/export.pike:1.18
Rev: src/block_alloc.h:1.3
Rev: src/callback.c:1.13
Rev: src/signal_handler.c:1.40
Rev: src/threads.h:1.38

1: + #define PRE_INIT_BLOCK(X)   #define INIT_BLOCK(X)   #define EXIT_BLOCK(X)   #define BLOCK_ALLOC(DATA,BSIZE) \
30:    for(e=0;e<BSIZE;e++) \    { \    n->x[e].next=PIKE_CONCAT3(free_,DATA,s); \ +  PRE_INIT_BLOCK( (n->x+e) ); \    PIKE_CONCAT3(free_,DATA,s)=n->x+e; \    } \    } \
44:   { \    EXIT_BLOCK(d); \    d->next=PIKE_CONCAT3(free_,DATA,s); \ +  PRE_INIT_BLOCK(d); \    PIKE_CONCAT3(free_,DATA,s)=d; \   } \    \