Adapt test to Scilab 6:
[scilab.git] / scilab / modules / console / tests / nonreg_tests / bug_13226.tst
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Calixte DENIZET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7
8 //
9 // <-- Non-regression test for bug 13226 -->
10 //
11 // <-- Bugzilla URL -->
12 // http://bugzilla.scilab.org/13226
13 //
14 // <-- Short Description -->
15 // Completion with accentued chars could lead to a a crash
16 //
17 // <-- LINUX ONLY -->
18 file_path = SCI + "/modules/console/tests/nonreg_tests/";
19 mkdir(TMPDIR + "/console");
20 cd(TMPDIR + "/console");
21
22 ilib_verbose(0);
23 ilib_name   = "console_c";
24 files       = "bug_13226.c";
25
26 for i = 1 : size(files, "*")
27     copyfile(file_path + "/" + files(i), TMPDIR + "/console");
28 end
29
30 if isdir(SCI+"/modules/console/includes") then
31     // Unix source version
32     libs   = SCI + "/modules/console/.libs/libsciconsole";
33     cflags = "-I " + SCI +"/modules/console/includes -I " + SCI + "/modules/localization/includes";
34
35 else
36     // Unix binary version
37     SCI_LIB     = strsubst(SCI,"/share\/scilab$/","lib/scilab"     ,"r");
38     SCI_INCLUDE = strsubst(SCI,"/share\/scilab$/","include/scilab" ,"r");
39     libs        = SCI_LIB + "/libsciconsole";
40     cflags      = "-I " + SCI_INCLUDE;
41 end
42
43 // name known in scilab , C function called
44 table = ["completecommandline"    ,"sci_completecommandline"];
45 ilib_build(ilib_name,table,files,libs,[],"",cflags);
46
47 clear ilib_build;
48 clear table;
49 clear libs;
50 clear files;
51 clear ilib_name;
52 clear gateway_c_dir;
53 clear SCI_LIB;
54 clear SCI_INCLUDE;
55
56 ierr = exec(TMPDIR + "/console/loader.sce", "errcatch", -1);
57
58 createdir(TMPDIR+"/Téléchargements");
59 mputl("",TMPDIR+"/Téléchargements/foo.bar");
60 cd(TMPDIR);
61
62 [r,c] = completecommandline("atomsInstall(""./Téléchargements/f",33);
63 assert_checkequal(r,"atomsInstall(""./Téléchargements/foo.bar");
64 assert_checkequal(c,39);