// =============================================================================
// 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 isletter
//===============================
TXT = 'A1,B2,C3';
//===============================
if isletter(TXT) <> [%T %F %F %T %F %F %T %F] then bugmes();quit;end
//===============================
if isletter('') <> [] then bugmes();quit;end
//===============================
if ~isletter('a') then bugmes();quit;end
if ~isletter('b') then bugmes();quit;end
if ~isletter('c') then bugmes();quit;end
if ~isletter('d') then bugmes();quit;end
if ~isletter('e') then bugmes();quit;end
if ~isletter('f') then bugmes();quit;end
if ~isletter('g') then bugmes();quit;end
if ~isletter('h') then bugmes();quit;end
if ~isletter('i') then bugmes();quit;end
if ~isletter('j') then bugmes();quit;end
if ~isletter('k') then bugmes();quit;end
if ~isletter('l') then bugmes();quit;end
if ~isletter('m') then bugmes();quit;end
if ~isletter('n') then bugmes();quit;end
if ~isletter('o') then bugmes();quit;end
if ~isletter('p') then bugmes();quit;end
if ~isletter('q') then bugmes();quit;end
if ~isletter('r') then bugmes();quit;end
if ~isletter('s') then bugmes();quit;end
if ~isletter('t') then bugmes();quit;end
if ~isletter('u') then bugmes();quit;end
if ~isletter('v') then bugmes();quit;end
if ~isletter('x') then bugmes();quit;end
if ~isletter('y') then bugmes();quit;end
if ~isletter('z') then bugmes();quit;end
if ~isletter('A') then bugmes();quit;end
if ~isletter('B') then bugmes();quit;end
if ~isletter('C') then bugmes();quit;end
if ~isletter('D') then bugmes();quit;end
if ~isletter('E') then bugmes();quit;end
if ~isletter('F') then bugmes();quit;end
if ~isletter('G') then bugmes();quit;end
if ~isletter('H') then bugmes();quit;end
if ~isletter('I') then bugmes();quit;end
if ~isletter('J') then bugmes();quit;end
if ~isletter('K') then bugmes();quit;end
if ~isletter('L') then bugmes();quit;end
if ~isletter('M') then bugmes();quit;end
if ~isletter('O') then bugmes();quit;end
if ~isletter('P') then bugmes();quit;end
if ~isletter('Q') then bugmes();quit;end
if ~isletter('R') then bugmes();quit;end
if ~isletter('S') then bugmes();quit;end
if ~isletter('T') then bugmes();quit;end
if ~isletter('U') then bugmes();quit;end
if ~isletter('V') then bugmes();quit;end
if ~isletter('X') then bugmes();quit;end
if ~isletter('Y') then bugmes();quit;end
if ~isletter('Z') then bugmes();quit;end
if isletter('!') then bugmes();quit;end
if isletter('#') then bugmes();quit;end
if isletter('$') then bugmes();quit;end
if isletter('%') then bugmes();quit;end
if isletter('&') then bugmes();quit;end
if isletter('(') then bugmes();quit;end
if isletter(')') then bugmes();quit;end
if isletter('*') then bugmes();quit;end
if isletter('+') then bugmes();quit;end
if isletter(',') then bugmes();quit;end
if isletter('-') then bugmes();quit;end
if isletter('.') then bugmes();quit;end
if isletter('/') then bugmes();quit;end
if isletter(':') then bugmes();quit;end
if isletter(';') then bugmes();quit;end
if isletter('<') then bugmes();quit;end
if isletter('=') then bugmes();quit;end
if isletter('>') then bugmes();quit;end
if isletter('@') then bugmes();quit;end
if isletter('[') then bugmes();quit;end
if isletter('\') then bugmes();quit;end
if isletter(']') then bugmes();quit;end
if isletter('^') then bugmes();quit;end
if isletter('_') then bugmes();quit;end
if isletter('`') then bugmes();quit;end
if isletter('{') then bugmes();quit;end
if isletter('|') then bugmes();quit;end
if isletter('}') then bugmes();quit;end
if isletter('~') then bugmes();quit;end
if isletter('0') then bugmes();quit;end
if isletter('1') then bugmes();quit;end
if isletter('2') then bugmes();quit;end
if isletter('3') then bugmes();quit;end
if isletter('4') then bugmes();quit;end
if isletter('5') then bugmes();quit;end
if isletter('6') then bugmes();quit;end
if isletter('7') then bugmes();quit;end
if isletter('8') then bugmes();quit;end
if isletter('9') then bugmes();quit;end
if isletter('''') then bugmes();quit;end
if isletter('""') then bugmes();quit;end