static void LiberarElemento( LIS_tppLista lista ,
tpElemLista * pElem )
{
if ( lista->pExcluir )
{
#ifdef _DEBUG
CNT_CONTAR( "LiberarElemento_Excluir" ) ;
#endif
lista->pExcluir( pElem->pValor ) ;
} else
{
#ifdef _DEBUG
CNT_CONTAR( "LiberarElemento_ExcluirNULL" ) ;
#endif
} /* if */
free( pElem ) ;
#ifdef _DEBUG
assert( qtdElemLiberados < 100 ) ;
elemLiberados[ qtdElemLiberados ] = pElem ;
qtdElemLiberados ++ ;
#endif
lista->numElem-- ;
} /* Fim função: LIS Liberar elemento da lista */
LIS_tpCondRet LIS_ExcluirValorElementoCorrente ( LIS_tppLista pLista )
{
if (pLista == NULL)
return LIS_CondRetListaVazia;
pLista->ExcluirValor(pLista->pElemCorr->pValor);
pLista->pElemCorr->pValor = NULL;
return LIS_CondRetOK;
} /* Fim funcao : LIS &Excluir valor elemento corrente */
void LiberarElemento( LIS_tppLista pLista ,
tpElemLista * pElem )
{
if ( ( pLista->ExcluirValor != NULL )
&& ( pElem->pValor != NULL ))
{
pLista->ExcluirValor( pElem->pValor ) ;
} /* if */
free( pElem ) ;
pLista->numElem-- ;
} /* Fim função: LIS -Liberar elemento da lista */
void LiberarElemento( LIS_tppLista pLista ,
tpElemLista * pElem )
{
#ifdef _DEBUG
CED_MarcarEspacoNaoAtivo(pElem);
#endif
if ( ( pLista->ExcluirValor != NULL )
&& ( pElem->pValor != NULL ))
{
pLista->ExcluirValor( pElem->pValor ) ;
} /* if */
free( pElem ) ;
pLista->numElem-- ;
} /* Fim função: LIS -Liberar elemento da lista */
