* Bug 16552 [m2sci]: cd, dir, dos, exist, ferror, +ismac, ispc, isunix, return
[scilab.git] / scilab / modules / m2sci / macros / sci_files / sci_ismac.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2020 - Samuel GOUGEON
3 //
4 // This file is hereby licensed under the terms of the GNU GPL v2.0,
5 // pursuant to article 5.3.4 of the CeCILL v.2.1.
6 // This file was originally licensed under the terms of the CeCILL v2.1,
7 // and continues to be available under such terms.
8 // For more information, see the COPYING file which you should have received
9 // along with this program.
10
11 function tree = sci_ismac(tree)
12     // M2SCI function
13     // Conversion function for Matlab ismac()
14     // Input: tree = Matlab funcall tree
15     // Ouput: tree = Scilab equivalent for tree
16
17     OS = Funcall("getos",1,list(),list())
18     tree = Operation("==", list(OS,Cste("Darwin")),tree.lhs)
19
20     tree.out(1).dims = list(1,1)
21     tree.out(1).type = Type(Boolean,Real)
22
23 endfunction