summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug1200.sci
blob: 4cd8e2fb21bc99c08cddca2e7fec5e22c98b115b (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
// <-- Non-regression test for bug 1200 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1200
//
// <-- Short Description -->
//    Incoherence dans le format d'un nombre.
//    En prenant par exemple j=0.001, on obtient un affichage 
//    incoherent avec format :
//    format("v",6) => 0.001
//    format("v",7) => 1.E-3
//    format("v",8) => 0.001

// Pierre MARECHAL - Scilab Project
// Copyright INRIA
// 1er juin 2005

J=0.001;
format("v",7);
diary(TMPDIR+"/bug1200.dia");
disp(J);
diary(0);

DIAFILECONTENTS=mgetl(TMPDIR+"/bug1200.dia");

REFFILECONTENTS=[" ";
	"    0.001  ";]

if and(DIAFILECONTENTS==REFFILECONTENTS) then
	affich_result(%T,1200);
else
	affich_result(%F,1200);
end