add a new reference for bug_4332 and create a reference for bug_4067
[scilab.git] / scilab / modules / completion / tests / nonreg_tests / bug_4067.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2009 - DIGITEO - Allan CORNET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- Non-regression test for bug 4067 -->
8 //
9 // <-- Bugzilla URL -->
10 // http://bugzilla.scilab.org/show_bug.cgi?id=4067
11 //
12 // <-- Short Description -->
13 // Completion STD mode.
14 // <-- JVM NOT MANDATORY -->
15 ilib_verbose(0);
16 if ierr<>0 then bugmes();quit;end
17 if ierr<>0 then bugmes();quit;end
18 chdir(TMPDIR);
19 mkdir('bug_4067');
20 chdir('bug_4067');
21 fd = mopen('bugA.sce','wt');
22 mclose(fd);
23 fd = mopen('bugB.sce','wt');
24 mclose(fd);
25 //exec bug<tab>
26 currentline = 'exec bug';
27 r = getfilepartlevel(currentline);
28 if r <> 'bug' then bugmes();quit;end
29 r = completion(getfilepartlevel(currentline),'files');
30 if and(gsort(r) <> gsort(['bugA.sce';'bugB.sce'])) then bugmes();quit;end
31 newline = completeline(currentline,'bugA.sce',getfilepartlevel(currentline),getpartlevel(currentline),%t);
32 if newline<>'exec bugA.sce' then bugmes();quit;end
33 // -->cd /h<TAB>
34 currentline = 'cd /h';
35 r = getfilepartlevel(currentline);
36 if r <> '/h' then bugmes();quit;end
37 newline = completeline(currentline,'/home',getfilepartlevel(currentline),getpartlevel(currentline),%t);
38 if newline<>'cd /home' then bugmes();quit;end