/** * cloog_block_free function: * This function frees the allocated memory for a CloogStatement structure. * - June 11th 2005: first version. * - June 30th 2005: scaldims field management. */ void cloog_block_free(CloogBlock * block) { int i ; if (block != NULL) { block->references -- ; if (block->references == 0) { cloog_block_leak_down(block->state); if (block->scaldims != NULL) { for (i=0;i<block->nb_scaldims;i++) cloog_int_clear(block->scaldims[i]); free(block->scaldims) ; } if (block->statement) cloog_statement_free(block->statement); free(block) ; } } }
/** * cloog_block_free function: * This function frees the allocated memory for a CloogStatement structure. * - June 11th 2005: first version. * - June 30th 2005: scaldims field management. */ void cloog_block_free(CloogBlock * block) { int i ; if (block != NULL) { cloog_block_dec_references (block); if (cloog_block_references (block) == 0) { cloog_block_leak_down() ; if (cloog_block_scaldims (block)) { for (i = 0; i < cloog_block_nb_scaldims (block); i++) value_clear_c (block->scaldims[i]); free (cloog_block_scaldims (block)) ; } cloog_statement_free(cloog_block_stmt (block)) ; free(block) ; } } }