コード例 #1
0
ファイル: defins.c プロジェクト: DrItanium/DROID-CLIPS
/***********************************************************
  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));
  }
コード例 #2
0
ファイル: classcom.c プロジェクト: atrniv/CLIPS
/***********************************************************
  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));
  }
コード例 #3
0
ファイル: globldef.c プロジェクト: femto/rbclips
globle void *EnvGetNextDefglobal(
  void *theEnv,
  void *defglobalPtr)
  { 
   return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) defglobalPtr,DefglobalData(theEnv)->DefglobalModuleIndex)); 
  }
コード例 #4
0
ファイル: ruledef.c プロジェクト: OS2World/DEV-LISP-Clips
globle void *GetNextDefrule(
  void *defrulePtr)
  { return((void *) GetNextConstructItem((struct constructHeader *) defrulePtr,DefruleModuleIndex)); }
コード例 #5
0
ファイル: dffnxfun.c プロジェクト: DrItanium/AdventureEngine
/****************************************************
  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));
  }
コード例 #6
0
ファイル: globldef.c プロジェクト: DrItanium/maya
Defglobal *GetNextDefglobal(
  Environment *theEnv,
  Defglobal *defglobalPtr)
  {
   return (Defglobal *) GetNextConstructItem(theEnv,&defglobalPtr->header,DefglobalData(theEnv)->DefglobalModuleIndex);
  }
コード例 #7
0
ファイル: ruledef.c プロジェクト: DrItanium/maya
Defrule *GetNextDefrule(
  Environment *theEnv,
  Defrule *defrulePtr)
  {
   return (Defrule *) GetNextConstructItem(theEnv,&defrulePtr->header,DefruleData(theEnv)->DefruleModuleIndex);
  }
コード例 #8
0
ファイル: tmpltdef.c プロジェクト: pandaxcl/CLIPS-unicode
globle void *EnvGetNextDeftemplate(
  void *theEnv,
  void *deftemplatePtr)
  {   
   return((void *) GetNextConstructItem(theEnv,(struct constructHeader *) deftemplatePtr,DeftemplateData(theEnv)->DeftemplateModuleIndex)); 
  }
コード例 #9
0
ファイル: dffctdef.c プロジェクト: DrItanium/maya
Deffacts *GetNextDeffacts(
  Environment *theEnv,
  Deffacts *deffactsPtr)
  {
   return (Deffacts *) GetNextConstructItem(theEnv,&deffactsPtr->header,DeffactsData(theEnv)->DeffactsModuleIndex);
  }