globle void DefglobalCompilerSetup(
void *theEnv)
{
DefglobalData(theEnv)->DefglobalCodeItem =
AddCodeGeneratorItem(theEnv,"defglobal",0,BeforeDefglobalsToCode,
InitDefglobalsCode,ConstructToCode,2);
}
globle void DefmoduleCompilerSetup(
void *theEnv)
{
DefmoduleData(theEnv)->DefmoduleCodeItem =
AddCodeGeneratorItem(theEnv,"defmodule",200,BeforeDefmodulesToCode,
InitDefmoduleCode,ConstructToCode,3);
}
/***************************************************
NAME : ObjectPatternsCompilerSetup
DESCRIPTION : Sets up interface for object
patterns to construct compiler
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item added
NOTES : None
***************************************************/
globle void ObjectPatternsCompilerSetup(
void *theEnv)
{
ObjectReteData(theEnv)->ObjectPatternCodeItem =
AddCodeGeneratorItem(theEnv,"object-patterns",0,BeforeObjectPatternsToCode,
InitObjectPatternsCode,ObjectPatternsToCode,2);
}
globle void DeffactsCompilerSetup(
void *theEnv)
{
DeffactsData(theEnv)->DeffactsCodeItem =
AddCodeGeneratorItem(theEnv,(char*)"deffacts",0,BeforeDeffactsToCode,
NULL,ConstructToCode,2);
}
void DeffactsCompilerSetup(
Environment *theEnv)
{
DeffactsData(theEnv)->DeffactsCodeItem =
AddCodeGeneratorItem(theEnv,"deffacts",0,BeforeDeffactsToCode,
InitDeffactsCode,ConstructToCode,2);
}
globle void DefruleCompilerSetup(
void *theEnv,
EXEC_STATUS)
{
DefruleData(theEnv,execStatus)->DefruleCodeItem = AddCodeGeneratorItem(theEnv,execStatus,"defrules",0,BeforeDefrulesCode,
InitDefruleCode,ConstructToCode,4);
}
globle void DefruleCompilerSetup()
{
DefruleCodeItem = AddCodeGeneratorItem("defrules",0,BeforeDefrulesCode,
#if FUZZY_DEFTEMPLATES
/* extra file required for Fuzzy Values -- to hold ptrs to fuzzy values in patterns */
NULL,ConstructToCode,4);
#else
NULL,ConstructToCode,3);
#endif
}
/***************************************************
NAME : SetupDefinstancesCompiler
DESCRIPTION : Initializes the construct compiler
item for definstances
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item initialized
NOTES : None
***************************************************/
globle void SetupDefinstancesCompiler(
void *theEnv)
{
DefinstancesData(theEnv)->DefinstancesCodeItem = AddCodeGeneratorItem(theEnv,(char*)"definstances",0,ReadyDefinstancesForCode,
NULL,DefinstancesToCode,2);
}
/***************************************************
NAME : SetupGenericsCompiler
DESCRIPTION : Initializes the construct compiler
item for generic functions
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item initialized
NOTES : None
***************************************************/
globle void SetupGenericsCompiler()
{
DefgenericCodeItem = AddCodeGeneratorItem("generics",0,ReadyDefgenericsForCode,
NULL,DefgenericsToCode,5);
}
globle void DefruleCompilerSetup(
void *theEnv)
{
DefruleData(theEnv)->DefruleCodeItem = AddCodeGeneratorItem(theEnv,(char*)"defrules",0,BeforeDefrulesCode,
InitDefruleCode,ConstructToCode,4);
}
globle void FactPatternsCompilerSetup()
{
FactCodeItem = AddCodeGeneratorItem("facts",0,BeforePatternNetworkToCode,
NULL,PatternNetworkToCode,1);
}
/***************************************************
NAME : SetupDeffunctionCompiler
DESCRIPTION : Initializes the construct compiler
item for deffunctions
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item initialized
NOTES : None
***************************************************/
void SetupDeffunctionCompiler(
void *theEnv)
{
DeffunctionData(theEnv)->DeffunctionCodeItem = AddCodeGeneratorItem(theEnv,"deffunctions",0,ReadyDeffunctionsForCode,
NULL,DeffunctionsToCode,2);
}
/***************************************************
NAME : SetupGenericsCompiler
DESCRIPTION : Initializes the construct compiler
item for generic functions
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item initialized
NOTES : None
***************************************************/
globle void SetupGenericsCompiler(
void *theEnv)
{
DefgenericData(theEnv)->DefgenericCodeItem = AddCodeGeneratorItem(theEnv,(char*)"generics",0,ReadyDefgenericsForCode,
NULL,DefgenericsToCode,5);
}
globle void DeftemplateCompilerSetup(
void *theEnv)
{
DeftemplateData(theEnv)->DeftemplateCodeItem = AddCodeGeneratorItem(theEnv,(char*)"deftemplate",0,NULL,InitDeftemplateCode,ConstructToCode,3);
}
/***************************************************
NAME : SetupDefinstancesCompiler
DESCRIPTION : Initializes the construct compiler
item for definstances
INPUTS : None
RETURNS : Nothing useful
SIDE EFFECTS : Code generator item initialized
NOTES : None
***************************************************/
globle void SetupDefinstancesCompiler()
{
DefinstancesCodeItem = AddCodeGeneratorItem("definstances",0,ReadyDefinstancesForCode,
NULL,DefinstancesToCode,2);
}
globle void DeftemplateCompilerSetup()
{
DeftemplateCodeItem = AddCodeGeneratorItem("deftemplate",0,NULL,NULL,ConstructToCode,3);
}
