/************************************************************ NAME : GetDefclassModuleCommand DESCRIPTION : Determines to which module a class belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (defclass-module <class-name>) ************************************************************/ void GetDefclassModuleCommand( Environment *theEnv, UDFContext *context, UDFValue *returnValue) { returnValue->value = GetConstructModuleCommand(context,"defclass-module",DefclassData(theEnv)->DefclassConstruct); }
void DefruleModuleFunction( UDFContext *context, CLIPSValue *returnValue) { void *theEnv = UDFContextEnvironment(context); CVSetCLIPSSymbol(returnValue,GetConstructModuleCommand(context,"defrule-module",DefruleData(theEnv)->DefruleConstruct)); }
/************************************************************ NAME : GetDefclassModuleCommand DESCRIPTION : Determines to which module a class belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (defclass-module <class-name>) ************************************************************/ globle void *GetDefclassModuleCommand( void *theEnv) { return(GetConstructModuleCommand(theEnv,"defclass-module",DefclassData(theEnv)->DefclassConstruct)); }
globle void *DeftemplateModuleFunction( void *theEnv) { return(GetConstructModuleCommand(theEnv,(char*)"deftemplate-module",DeftemplateData(theEnv)->DeftemplateConstruct)); }
globle SYMBOL_HN *DefruleModuleFunction( void *theEnv) { return(GetConstructModuleCommand(theEnv,"defrule-module",DefruleData(theEnv)->DefruleConstruct)); }
/**************************************************************** NAME : GetDeffunctionModuleCommand DESCRIPTION : Determines to which module a deffunction belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (deffunction-module <dfnx-name>) ****************************************************************/ globle void *GetDeffunctionModuleCommand( void *theEnv) { return(GetConstructModuleCommand(theEnv,(char*)"deffunction-module",DeffunctionData(theEnv)->DeffunctionConstruct)); }
globle SYMBOL_HN *DefglobalModuleFunction() { return(GetConstructModuleCommand("defglobal-module",DefglobalConstruct)); }
/***************************************************************** NAME : GetDefinstancesModuleCommand DESCRIPTION : Determines to which module a definstances belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (definstances-module <defins-name>) *****************************************************************/ globle void *GetDefinstancesModuleCommand( void *theEnv) { return(GetConstructModuleCommand(theEnv,(char*)"definstances-module",DefinstancesData(theEnv)->DefinstancesConstruct)); }
globle void *DefruleModuleFunction( void *theEnv, EXEC_STATUS) { return(GetConstructModuleCommand(theEnv,execStatus,"defrule-module",DefruleData(theEnv,execStatus)->DefruleConstruct)); }
globle void *DefglobalModuleFunction( void *theEnv) { return(GetConstructModuleCommand(theEnv,"defglobal-module",DefglobalData(theEnv)->DefglobalConstruct)); }
/***************************************************************** NAME : GetDefinstancesModuleCommand DESCRIPTION : Determines to which module a definstances belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (definstances-module <defins-name>) *****************************************************************/ globle SYMBOL_HN *GetDefinstancesModuleCommand( void *theEnv) { return(GetConstructModuleCommand(theEnv,"definstances-module",DefinstancesData(theEnv)->DefinstancesConstruct)); }
globle SYMBOL_HN *DeftemplateModuleFunction() { return(GetConstructModuleCommand("deftemplate-module",DeftemplateConstruct)); }
/**************************************************************** NAME : GetDeffunctionModuleCommand DESCRIPTION : Determines to which module a deffunction belongs INPUTS : None RETURNS : The symbolic name of the module SIDE EFFECTS : None NOTES : H/L Syntax: (deffunction-module <dfnx-name>) ****************************************************************/ globle void *GetDeffunctionModuleCommand( void *theEnv, EXEC_STATUS) { return(GetConstructModuleCommand(theEnv,execStatus,"deffunction-module",DeffunctionData(theEnv,execStatus)->DeffunctionConstruct)); }
globle void *DeffactsModuleFunction( void *theEnv) { return(GetConstructModuleCommand(theEnv,"deffacts-module",DeffactsData(theEnv)->DeffactsConstruct)); }