summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug1123.sci
blob: 2217ae0d801f1a996dbdc3bd23c806ac9c92b11b (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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
// <-- Non-regression test for bug 1123 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1123
//
// <-- Short Description -->
//    I think this bug is related to other ones but the matlab
//    construction :
//
//    if(mod(N,2))N=N-1;t=t(1:N);xs=xs(1:N);xp=xp(1:N); x=x(1:N);end
//
//    leads to a error 43 the m2sci script


// Non-regression test file for bug 1123
// Copyright INRIA
// Scilab Project - F. Belahcene

mode(-1);
clear;

MFILECONTENTS="if(true)t=1;end"

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

mputl(MFILECONTENTS,MFILE);


mfile2sci(MFILE,TMPDIR);
SCIFILECONTENTS=mgetl(SCIFILE);


SCIFILECONTENTSREF=["";
"// Display mode";
"mode(0);";
"";
"// Display warning for floating point exception";
"ieee(1);";
"";
"if %t then t = 1;end;"]

correct=%T
if or(SCIFILECONTENTSREF<>SCIFILECONTENTS) then
  correct=%F
end

affich_result(correct,1123);

clear