/*********************************************************** NAME : EnvGetNextDefinstances DESCRIPTION : Finds first or next definstances INPUTS : The address of the current definstances RETURNS : The address of the next definstances (NULL if none) SIDE EFFECTS : None NOTES : If ptr == NULL, the first definstances is returned. ***********************************************************/ globle void *EnvGetNextDefinstances( void *theEnv, void *ptr) { return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) ptr, DefinstancesData(theEnv)->DefinstancesModuleIndex)); }
/*********************************************************** NAME : EnvGetNextDefclass DESCRIPTION : Finds first or next defclass INPUTS : The address of the current defclass RETURNS : The address of the next defclass (NULL if none) SIDE EFFECTS : None NOTES : If ptr == NULL, the first defclass is returned. ***********************************************************/ globle void *EnvGetNextDefclass( void *theEnv, EXEC_STATUS, void *ptr) { return((void *) GetNextConstructItem(theEnv,execStatus,(struct constructHeader *) ptr,DefclassData(theEnv,execStatus)->DefclassModuleIndex)); }
globle void *EnvGetNextDefglobal( void *theEnv, void *defglobalPtr) { return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) defglobalPtr,DefglobalData(theEnv)->DefglobalModuleIndex)); }
globle void *GetNextDefrule( void *defrulePtr) { return((void *) GetNextConstructItem((struct constructHeader *) defrulePtr,DefruleModuleIndex)); }
/**************************************************** NAME : EnvGetNextDeffunction DESCRIPTION : Accesses list of deffunctions INPUTS : Deffunction pointer RETURNS : The next deffunction, or the first deffunction (if input is NULL) SIDE EFFECTS : None NOTES : None ****************************************************/ globle void *EnvGetNextDeffunction( void *theEnv, void *ptr) { return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) ptr,DeffunctionData(theEnv)->DeffunctionModuleIndex)); }
Defglobal *GetNextDefglobal( Environment *theEnv, Defglobal *defglobalPtr) { return (Defglobal *) GetNextConstructItem(theEnv,&defglobalPtr->header,DefglobalData(theEnv)->DefglobalModuleIndex); }
Defrule *GetNextDefrule( Environment *theEnv, Defrule *defrulePtr) { return (Defrule *) GetNextConstructItem(theEnv,&defrulePtr->header,DefruleData(theEnv)->DefruleModuleIndex); }
globle void *EnvGetNextDeftemplate( void *theEnv, void *deftemplatePtr) { return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) deftemplatePtr,DeftemplateData(theEnv)->DeftemplateModuleIndex)); }
Deffacts *GetNextDeffacts( Environment *theEnv, Deffacts *deffactsPtr) { return (Deffacts *) GetNextConstructItem(theEnv,&deffactsPtr->header,DeffactsData(theEnv)->DeffactsModuleIndex); }