コード例 #1
0
ファイル: factfun.c プロジェクト: noxdafox/clips
globle int FactExistpFunction(
  void *theEnv)
  {
   struct fact *theFact;

   if (EnvArgCountCheck(theEnv,"fact-existp",EXACTLY,1) == -1) return(-1L);

   theFact = GetFactAddressOrIndexArgument(theEnv,"fact-existp",1,FALSE);

   return(EnvFactExistp(theEnv,theFact));
  }
コード例 #2
0
ファイル: factfun.c プロジェクト: noxdafox/clips
globle int FactExistp(
  void *vTheFact)
  {
   return EnvFactExistp(GetCurrentEnvironment(),vTheFact);
  }
コード例 #3
0
ファイル: fact.cpp プロジェクト: mvancompernolle/ai_project
 bool Fact::exists() const {
   if ( m_cobj )
     return EnvFactExistp( m_environment.cobj(), m_cobj );
   return false;
 }