update some dynamic_link tests to create tmp files in scilab tmp dir instead of os...
[scilab.git] / scilab / modules / dynamic_link / tests / nonreg_tests / bug_3630.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2008 - DIGITEO - Allan CORNET
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- ENGLISH IMPOSED -->
8 // <-- Non-regression test for bug 3630 -->
9 //
10 // <-- Bugzilla URL -->
11 // http://bugzilla.scilab.org/show_bug.cgi?id=3630
12 //
13 // <-- Short Description -->
14 // functions added by addinter are not visible by 'what'
15 ilib_verbose(0);
16 test_path = get_absolute_file_path('bug_3630.tst');
17 currentpath = pwd();
18 cd TMPDIR;
19 OS_TMP_DIR = pwd();
20 mkdir(OS_TMP_DIR,'bug_3630');
21 TEST_DIR = OS_TMP_DIR + filesep() + 'bug_3630';
22 copyfile(SCI+'/modules/dynamic_link/tests/nonreg_tests/bug_3630.c' , TEST_DIR + filesep() + 'bug_3630.c');
23 chdir(TEST_DIR);
24 files=['bug_3630.c'];
25 ilib_build('libc_fun',['c_sum','c_intsum';'c_sub','c_intsub'],files,[]);
26 [primitives1,commandes] = what();
27 nbprimitives1 = size(primitives1,'*');
28 // load the shared library 
29 exec loader.sce;
30 chdir(currentpath);
31 [primitives2,commandes] = what();
32 nbprimitives2 = size(primitives2,'*');
33 if (nbprimitives2 - nbprimitives1) <> 2 then bugmes();quit;end
34 if ~or(primitives2 == 'c_sum') then bugmes();quit;end
35 if ~or(primitives2 == 'c_sub') then bugmes();quit;end
36 // ulink() all libraries
37 ulink();
38 clearfun('c_sum');
39 clearfun('c_sub');
40 [primitives3,commandes] = what();
41 nbprimitives3 = size(primitives3,'*');
42 if or(primitives3 == 'c_sum') then bugmes();quit;end
43 if or(primitives3 == 'c_sub') then bugmes();quit;end
44 if (nbprimitives3 - nbprimitives1) <> 0 then bugmes();quit;end
45 //remove TMP_DIR
46 rmdir(TEST_DIR,'s');
47 // =============================================================================