tempname function added (it will be used to fix bug 9614)
[scilab.git] / scilab / modules / fileio / tests / unit_tests / tempname.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2011 - DIGITEO - Allan CORNET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //
8 // <-- JVM NOT MANDATORY -->
9 //
10 // some unit tests about tempname
11 //
12 F = tempname();
13 assert_checkequal(isfile(F), %t);
14 F = tempname('PRE');
15 assert_checkequal(isfile(F), %t);
16 msgerror = "%s: Wrong type for input argument #%d: A string expected.\n";
17 assert_checkerror ( "F = tempname(1)" , msgerror, 999, "tempname" , 1);
18 msgerror = "%s: Wrong size for input argument #%d: A scalar expected.\n";
19 assert_checkerror ( "F = tempname([''A'',''B''])" , msgerror, 999, "tempname" , 1);
20 if getos() == "Windows" then
21   msgerror = "%s: Wrong size for input argument #%d: A string (3 characters max.) expected.\n";
22   assert_checkerror ( "F = tempname(''toolongasprefixonwindows'')" , msgerror, 999, "tempname" , 1);
23 end
24 F = tempname();
25 [p, f, ext]=fileparts(F);
26 assert_checkequal(part(f,1:3), "SCI");
27 F = tempname("TMP");
28 [p, f, ext] = fileparts(F);
29 assert_checkequal(part(f,1:3), "TMP");
30 if getos() == "Windows" then
31   assert_checkequal(ext, ".tmp");
32 end