예제 #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
 bool Fact::exists() const {
   if ( m_cobj )
     return EnvFactExistp( m_environment.cobj(), m_cobj );
   return false;
 }