summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug1787.sci
blob: 3c96f6482d3a4422219e91f967ef2de316816048 (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
// <-- Non-regression test for bug 1787 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1787
//
// <-- Short Description -->
//    Scilab 4.0 RC1
//    The calling of procedure xtitle bugs when the drawing of boxes is asked.
//
//    Jacques-Deric

// Copyright INRIA
// Scilab Project - Jean-Baptiste Silvy
// Copyright INRIA 2006
// Date : 10/02/2006

titleStr  = "Scilab P0W3R" ;
xLabelStr = "XXX" ;
yLabelStr = "YYY" ;

xtitle("Scilab P0W3R",'XXX','YYY',1) ;
a = gca() ;
title  = a.title   ;
xLabel = a.x_label ;
yLabel = a.y_label ;

resT = ( title.text  == titleStr  ) & ( title.fill_mode  == 'on' ) ;
resX = ( xLabel.text == xLabelStr ) & ( xLabel.fill_mode == 'on' ) ;
resY = ( yLabel.text == yLabelStr ) & ( yLabel.fill_mode == 'on' ) ;

// check that a box is drawn around the labels
// and that they have the rigth text
if ( resT & resX & resY ) then
  affich_result(%T,1787);
else
  affich_result(%F,1787);
end