blob: 8aff4b280d40673b546cf4fb58fcbb66357dd101 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2007-2008 - INRIA
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// <-- CLI SHELL MODE -->
//===============================
// unit tests str2code
//===============================
if or(_str2code('abcdefghijklmnopqrstuvwxyz')<>(10:35)') then bugmes();quit;end
if or(_str2code('ABCDEFGHIJKLMNOPQRSTUVWXYZ')<>-(10:35)') then bugmes();quit;end
if or(_str2code('0123456789')<>(0:9)') then bugmes();quit;end
if _str2code(emptystr())<>[] then bugmes();quit;end
//===============================
if _str2code('Scilab') <> [-28;12;18;21;10;11] then bugmes();quit;end
//===============================
|
