1// ============================================================================= 2// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab 3// Copyright (C) 2007-2008 - INRIA 4// 5// This file is distributed under the same license as the Scilab package. 6// ============================================================================= 7// <-- CLI SHELL MODE --> 8//=============================== 9// unit tests isalphanum 10//=============================== 11TXT = 'A1,B2,C3'; 12//=============================== 13if isalphanum(TXT) <> [ %T %T %F %T %T %F %T %T] then bugmes();quit;end 14//=============================== 15if isalphanum('') <> [] then bugmes();quit;end 16//=============================== 17if ~isalphanum('a') then bugmes();quit;end 18if ~isalphanum('b') then bugmes();quit;end 19if ~isalphanum('c') then bugmes();quit;end 20if ~isalphanum('d') then bugmes();quit;end 21if ~isalphanum('e') then bugmes();quit;end 22if ~isalphanum('f') then bugmes();quit;end 23if ~isalphanum('g') then bugmes();quit;end 24if ~isalphanum('h') then bugmes();quit;end 25if ~isalphanum('i') then bugmes();quit;end 26if ~isalphanum('j') then bugmes();quit;end 27if ~isalphanum('k') then bugmes();quit;end 28if ~isalphanum('l') then bugmes();quit;end 29if ~isalphanum('m') then bugmes();quit;end 30if ~isalphanum('n') then bugmes();quit;end 31if ~isalphanum('o') then bugmes();quit;end 32if ~isalphanum('p') then bugmes();quit;end 33if ~isalphanum('q') then bugmes();quit;end 34if ~isalphanum('r') then bugmes();quit;end 35if ~isalphanum('s') then bugmes();quit;end 36if ~isalphanum('t') then bugmes();quit;end 37if ~isalphanum('u') then bugmes();quit;end 38if ~isalphanum('v') then bugmes();quit;end 39if ~isalphanum('x') then bugmes();quit;end 40if ~isalphanum('y') then bugmes();quit;end 41if ~isalphanum('z') then bugmes();quit;end 42if ~isalphanum('A') then bugmes();quit;end 43if ~isalphanum('B') then bugmes();quit;end 44if ~isalphanum('C') then bugmes();quit;end 45if ~isalphanum('D') then bugmes();quit;end 46if ~isalphanum('E') then bugmes();quit;end 47if ~isalphanum('F') then bugmes();quit;end 48if ~isalphanum('G') then bugmes();quit;end 49if ~isalphanum('H') then bugmes();quit;end 50if ~isalphanum('I') then bugmes();quit;end 51if ~isalphanum('J') then bugmes();quit;end 52if ~isalphanum('K') then bugmes();quit;end 53if ~isalphanum('L') then bugmes();quit;end 54if ~isalphanum('M') then bugmes();quit;end 55if ~isalphanum('O') then bugmes();quit;end 56if ~isalphanum('P') then bugmes();quit;end 57if ~isalphanum('Q') then bugmes();quit;end 58if ~isalphanum('R') then bugmes();quit;end 59if ~isalphanum('S') then bugmes();quit;end 60if ~isalphanum('T') then bugmes();quit;end 61if ~isalphanum('U') then bugmes();quit;end 62if ~isalphanum('V') then bugmes();quit;end 63if ~isalphanum('X') then bugmes();quit;end 64if ~isalphanum('Y') then bugmes();quit;end 65if ~isalphanum('Z') then bugmes();quit;end 66if ~isalphanum('1') then bugmes();quit;end 67if ~isalphanum('2') then bugmes();quit;end 68if ~isalphanum('3') then bugmes();quit;end 69if ~isalphanum('4') then bugmes();quit;end 70if ~isalphanum('5') then bugmes();quit;end 71if ~isalphanum('6') then bugmes();quit;end 72if ~isalphanum('7') then bugmes();quit;end 73if ~isalphanum('8') then bugmes();quit;end 74if ~isalphanum('9') then bugmes();quit;end 75if isalphanum('!') then bugmes();quit;end 76if isalphanum('#') then bugmes();quit;end 77if isalphanum('$') then bugmes();quit;end 78if isalphanum('%') then bugmes();quit;end 79if isalphanum('&') then bugmes();quit;end 80if isalphanum('(') then bugmes();quit;end 81if isalphanum(')') then bugmes();quit;end 82if isalphanum('*') then bugmes();quit;end 83if isalphanum('+') then bugmes();quit;end 84if isalphanum(',') then bugmes();quit;end 85if isalphanum('-') then bugmes();quit;end 86if isalphanum('.') then bugmes();quit;end 87if isalphanum('/') then bugmes();quit;end 88if isalphanum(':') then bugmes();quit;end 89if isalphanum(';') then bugmes();quit;end 90if isalphanum('<') then bugmes();quit;end 91if isalphanum('=') then bugmes();quit;end 92if isalphanum('>') then bugmes();quit;end 93if isalphanum('@') then bugmes();quit;end 94if isalphanum('[') then bugmes();quit;end 95if isalphanum('\') then bugmes();quit;end 96if isalphanum(']') then bugmes();quit;end 97if isalphanum('^') then bugmes();quit;end 98if isalphanum('_') then bugmes();quit;end 99if isalphanum('`') then bugmes();quit;end 100if isalphanum('{') then bugmes();quit;end 101if isalphanum('|') then bugmes();quit;end 102if isalphanum('}') then bugmes();quit;end 103if isalphanum('~') then bugmes();quit;end 104