summaryrefslogtreecommitdiffstats
path: root/tests/nonRegression/bug1025.sci
blob: bde27077bd336c2247139bdd38bd3540364ecd82 (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
// <-- Non-regression test for bug 1025 -->
//
// <-- Bugzilla URL -->
// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1025
//
// <-- Short Description -->
//    winsid ne marche pas.


// Non-regression test file for bug 1025
// Pierre MARECHAL - Scilab Project
// Copyright INRIA
// 1er juin 2005

mode(-1);
clear;

set figure_style old;
xset('window',1000);
set figure_style old;
xset('window',0);
set figure_style new;

A = winsid();

if and(A == [0,1000]) then
	affich_result(%T,1025);
else
	affich_result(%F,1025);
end