summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug2428.sci
blob: bbc23d3ef8345900c5524df14c9d050e102802eb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
// Non-regression test file for bug 2428
// Copyright INRIA
// Scilab Project - Vincent COUVERT

//mode(-1);
clear;

MFILE=TMPDIR+"/bug2428.m"
SCIFILE=TMPDIR+"/bug2428.sci"

correct=%T;

MFILECONTENTS=["function bug2428";
    "global gui_settings";
    "i = 1;";
    "a = gui_settings.pn_mem{i}"]

fd=mopen(MFILE,"w");
mputl(MFILECONTENTS,fd);
mclose(fd);

ierr=execstr("mfile2sci("""+MFILE+""","""+TMPDIR+""")","errcatch")
correct=correct&ierr==0;

//affich_result(correct,2428);
disp(correct);
clear