/**************************************************** NAME : InstancesPurge DESCRIPTION : Removes all instances INPUTS : None RETURNS : true if all instances deleted, false otherwise SIDE EFFECTS : The instance hash table is cleared NOTES : None ****************************************************/ bool InstancesPurge( void *theEnv) { DestroyAllInstances(theEnv); CleanupInstances(theEnv); return((InstanceData(theEnv)->InstanceList != NULL) ? false : true); }
/**************************************************** NAME : InstancesPurge DESCRIPTION : Removes all instances INPUTS : None RETURNS : TRUE if all instances deleted, FALSE otherwise SIDE EFFECTS : The instance hash table is cleared NOTES : None ****************************************************/ globle intBool InstancesPurge( void *theEnv) { DestroyAllInstances(theEnv); CleanupInstances(theEnv); return((InstanceData(theEnv)->InstanceList != NULL) ? FALSE : TRUE); }
/**************************************************** NAME : InstancesPurge DESCRIPTION : Removes all instances INPUTS : None RETURNS : TRUE if all instances deleted, FALSE otherwise SIDE EFFECTS : The instance hash table is cleared NOTES : None ****************************************************/ globle BOOLEAN InstancesPurge() { int svdepth; DestroyAllInstances(); svdepth = CurrentEvaluationDepth; if (CurrentEvaluationDepth == 0) CurrentEvaluationDepth = -1; CleanupInstances(); CurrentEvaluationDepth = svdepth; return((InstanceList != NULL) ? FALSE : TRUE); }
/**************************************************** NAME : InstancesPurge DESCRIPTION : Removes all instances INPUTS : None RETURNS : TRUE if all instances deleted, FALSE otherwise SIDE EFFECTS : The instance hash table is cleared NOTES : None ****************************************************/ globle intBool InstancesPurge( void *theEnv) { int svdepth; DestroyAllInstances(theEnv); svdepth = EvaluationData(theEnv)->CurrentEvaluationDepth; if (EvaluationData(theEnv)->CurrentEvaluationDepth == 0) EvaluationData(theEnv)->CurrentEvaluationDepth = -1; CleanupInstances(theEnv); EvaluationData(theEnv)->CurrentEvaluationDepth = svdepth; return((InstanceData(theEnv)->InstanceList != NULL) ? FALSE : TRUE); }