diff options
author | jofret | 2008-06-05 11:18:08 +0000 |
---|---|---|
committer | jofret | 2008-06-05 11:18:08 +0000 |
commit | 4420122a451b41861f0cf696bb749cd2a220e678 (patch) | |
tree | 161a25acc57a1966cba0020b470c680d52763ae9 /src/Scilab2C/GeneralFunctions/SCI2Cfileexist.sci | |
parent | 576f855e4fdf04cc49f57b173062731f3d03271d (diff) | |
download | scilab2c-4420122a451b41861f0cf696bb749cd2a220e678.tar.gz scilab2c-4420122a451b41861f0cf696bb749cd2a220e678.tar.bz2 scilab2c-4420122a451b41861f0cf696bb749cd2a220e678.zip |
Remove old Scilab2C structure
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
|