diff options
Diffstat (limited to 'src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci')
-rw-r--r-- | src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci b/src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci deleted file mode 100644 index 87cc1777..00000000 --- a/src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci +++ /dev/null @@ -1,28 +0,0 @@ -function ExistTest = SCI2Cfileexist(InDir,FileName)
-// function ExistTest = SCI2Cfileexist(InDir,FileName)
-// -----------------------------------------------------------------
-// Searches for the file FileName in the directory InDir.
-// Return %F if it doesn't exist.
-//
-// Input data:
-//
-// Output data:
-//
-// Status:
-// 12-Jun-2007 -- Nutricato Raffaele: Author.
-// -----------------------------------------------------------------
-
-tmppwd = pwd();
-cd(InDir);
-allfiles = ls(FileName);
-cd(tmppwd);
-
-if (size(allfiles,1) == 0)
- ExistTest = %F;
-elseif (size(allfiles,1) == 1)
- ExistTest = %T;
-else
- SCI2Cerror('Very Strange! Found more than one file with the same name.');
-end
-
-endfunction
|