-/*--------------------------------------------------*/
-/* MACROS FOR HANDLING BASIC BLOCKS */
-/*--------------------------------------------------*/
-
-/* COPYCURSTACK makes a copy of the current operand stack (curstack)
- * and returns it in the variable copy.
- *
- * This macro is used to propagate the operand stack from one basic
- * block to another. The destination block receives the copy as its
- * input stack.
- */
-#define COPYCURSTACK(sd, copy) { \
- stackptr s; \
- if (curstack) { \
- s = curstack; \
- (sd).new += stackdepth; \
- copy = (sd).new; \
- while (s) { \
- GET_NEW_VAR(sd, new_index, s->type); \
- copy--; \
- copy->prev = copy-1; \
- copy->creator = NULL; \
- copy->type = s->type; \
- copy->flags = 0; \
- copy->varkind = STACKVAR; \
- copy->varnum = new_index; \
- (sd).var[new_index].flags = OUTVAR; \
- s = s->prev; \
- } \
- copy->prev = NULL; \
- copy = (sd).new-1; \
- } \
- else \
- copy = NULL; \
-}
-
-
-/* external macros ************************************************************/
-
-#define BLOCK_OF(index) \
- (jd->new_basicblocks + jd->new_basicblockindex[index])
-
-