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)); }
globle int FactExistp( void *vTheFact) { return EnvFactExistp(GetCurrentEnvironment(),vTheFact); }
bool Fact::exists() const { if ( m_cobj ) return EnvFactExistp( m_environment.cobj(), m_cobj ); return false; }