1 files changed, 31 insertions, 0 deletions
diff --git a/modules/fileio/includes/mclose.h b/modules/fileio/includes/mclose.h
new file mode 100755
index 000000000..8357c8da2
--- /dev/null
+++ b/modules/fileio/includes/mclose.h
@@ -0,0 +1,31 @@
+/*
+ * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+ * Copyright (C) 2007 - INRIA
+ *
+ * This file must be used under the terms of the CeCILL.
+ * This source file is licensed as described in the file COPYING, which
+ * you should have received as part of this distribution.  The terms
+ * are also available at
+ * http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
+ *
+ */
+/*--------------------------------------------------------------------------*/
+#ifndef __MCLOSE_H__
+#define __MCLOSE_H__
+#include "dynlib_fileio.h"
+#include "machine.h"
+
+/*--------------------------------------------------------------------------*/
+#define ALL_FILES_DESCRIPTOR -2
+/*--------------------------------------------------------------------------*/
+
+/**
+* close the file with id *fd
+* if *id != -1 and *id != -2
+* the current file if *id = -1
+* all opened file if *id = -2
+*/
+FILEIO_IMPEXP void C2F(mclose) (int *fd, double *res);
+
+#endif /* __MCLOSE_H__ */
+/*--------------------------------------------------------------------------*/