1 /*
2 * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 * Copyright (C) 2013 - Scilab Enterprises - Cedric Delamarre
4 *
5 * Copyright (C) 2012 - 2016 - Scilab Enterprises
6 *
7 * This file is hereby licensed under the terms of the GNU GPL v2.0,
8 * pursuant to article 5.3.4 of the CeCILL v.2.1.
9 * This file was originally licensed under the terms of the CeCILL v2.1,
10 * and continues to be available under such terms.
11 * For more information, see the COPYING file which you should have received
12 * along with this program.
13 *
14 */
15 /*--------------------------------------------------------------------------*/
16 #include "filemanager.hxx"
17 extern "C"
18 {
19 #include "getfiledesc.h"
20 }
21 /*--------------------------------------------------------------------------*/
C2F(getfiledesc)22 void C2F(getfiledesc)(int *fd)
23 {
24 *fd = FileManager::getFirstFreeFileID();
25 }
26 /*--------------------------------------------------------------------------*/
27