コード例 #1
0
ファイル: filecom.c プロジェクト: ricksladkey/CLIPS
globle int SaveCommand(
  void *theEnv)
  {
#if (! BLOAD_ONLY) && (! RUN_TIME)
   char *theFileName;

   if (EnvArgCountCheck(theEnv,"save",EXACTLY,1) == -1) return(FALSE);
   if ((theFileName = GetFileName(theEnv,"save",1)) == NULL) return(FALSE);

   if (EnvSave(theEnv,theFileName) == FALSE)
     {
      OpenErrorMessage(theEnv,"save",theFileName);
      return(FALSE);
     }

   return(TRUE);
#else
   EnvPrintRouter(theEnv,WDIALOG,"Save is not available in this environment\n");
   return(FALSE);
#endif
  }
コード例 #2
0
ファイル: constrct.c プロジェクト: Khenji55/Computacion_UCLM
globle int Save(
  const char *fileName)
  {
   return EnvSave(GetCurrentEnvironment(),fileName);
  }  
コード例 #3
0
ファイル: constrct.c プロジェクト: atrniv/CLIPS
globle int Save(
  char *fileName)  
  {
   return EnvSave(GetCurrentEnvironment(),GetCurrentExecutionStatus(),fileName);
  }