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
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2010 - Allan CORNET
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
//
// <-- JVM NOT MANDATORY -->
//
// <-- Non-regression test for bug 8528 -->
//
// <-- Bugzilla URL -->
// http://bugzilla.scilab.org/show_bug.cgi?id=8528
//
// <-- Short Description -->
// length returned a wrong size for malformed characters.
//
if length(ascii(181)) <> 1 then bugmes();quit;end
if length(ascii([83. 99. 105. 108. 97. 98.])) <> 6 then bugmes();quit;end
if length("Scilab") <> 6 then bugmes();quit;end
if length(ascii([83. 99. 105. 181. 108. 97. 98.])) <> 7 then bugmes();quit;end
if length("Sciµlab") <> 7 then bugmes();quit;end
for i=127:255
if length(ascii(i)) <> 1 then bugmes();quit;end
end
|
