-//<-- CLI SHELL MODE -->
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2008 - DIGITEO - Allan CORNET
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
+//
+//<-- CLI SHELL MODE -->
// <-- Non-regression test for bug 3775 -->
//
// <-- Short Description -->
// <-- Bugzilla URL -->
// http://bugzilla.scilab.org/show_bug.cgi?id=3775
//
-a=mopen(TMPDIR+'test.sce','wt');
-path_returned = get_absolute_file_path('test.sce');
-if (path_returned <> TMPDIR) then bugmes();quit;end
+a=mopen(TMPDIR+filesep()+"test.sce","wt");
+path_returned = get_absolute_file_path("test.sce");
+if (path_returned <> TMPDIR+filesep()) then bugmes();quit;end
mclose(a);
-ierr = execstr('path_returned = get_absolute_file_path(''test.sce'');','errcatch');
+ierr = execstr("path_returned = get_absolute_file_path(''test.sce'');","errcatch");
if ierr <> 999 then bugmes();quit;end
-//<-- CLI SHELL MODE -->
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2008 - DIGITEO - Allan CORNET
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
-
+//
+//<-- CLI SHELL MODE -->
// <-- Non-regression test for bug 3775 -->
//
// http://bugzilla.scilab.org/show_bug.cgi?id=3775
//
-a=mopen(TMPDIR+'test.sce','wt');
-path_returned = get_absolute_file_path('test.sce');
-if (path_returned <> TMPDIR) then pause,end
+a=mopen(TMPDIR+filesep()+"test.sce","wt");
+path_returned = get_absolute_file_path("test.sce");
+if (path_returned <> TMPDIR+filesep()) then pause,end
mclose(a);
-ierr = execstr('path_returned = get_absolute_file_path(''test.sce'');','errcatch');
+ierr = execstr("path_returned = get_absolute_file_path(''test.sce'');","errcatch");
if ierr <> 999 then pause,end
-//<-- CLI SHELL MODE -->
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2015 - Scilab Enterprises - Cedric Delamarre
// This file is distributed under the same license as the Scilab package.
// =============================================================================
//
+// <-- CLI SHELL MODE -->
// <-- Non-regression test for bug 14049 -->
//
// <-- Bugzilla URL -->
//
// <-- Short Description -->
// genlib hangs if an unexpected endfunction occurs
-mkdir(TMPDIR + "bug_14049");
+mkdir(TMPDIR+filesep()+"bug_14049");
fun = [ "function r=foo()"
"x=1"
"endfunction"
"endfunction"];
-mputl(fun, TMPDIR + "bug_14049"+filesep()+"bug_14049.sce");
-genlib("bug_14049lib",TMPDIR+"bug_14049",%t);
+mputl(fun, TMPDIR+filesep()+"bug_14049"+filesep()+"bug_14049.sce");
+genlib("bug_14049lib",TMPDIR+filesep()+"bug_14049",%t);
-//<-- CLI SHELL MODE -->
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2015 - Scilab Enterprises - Cedric Delamarre
// This file is distributed under the same license as the Scilab package.
// =============================================================================
//
+// <-- CLI SHELL MODE -->
// <-- Non-regression test for bug 14049 -->
//
// <-- Bugzilla URL -->
// <-- Short Description -->
// genlib hangs if an unexpected endfunction occurs
-mkdir(TMPDIR + "bug_14049");
+mkdir(TMPDIR+filesep()+"bug_14049");
fun = [ "function r=foo()"
"x=1"
"endfunction"
"endfunction"];
-mputl(fun, TMPDIR + "bug_14049"+filesep()+"bug_14049.sce");
-genlib("bug_14049lib",TMPDIR+"bug_14049",%t);
+mputl(fun, TMPDIR+filesep()+"bug_14049"+filesep()+"bug_14049.sce");
+genlib("bug_14049lib",TMPDIR+filesep()+"bug_14049",%t);