summaryrefslogtreecommitdiff
path: root/modules/string/tests/unit_tests/strtok.tst
blob: 922540622bf86ca7128b81509c9714bd4fb69eab (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
// =============================================================================
// 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 -->

//=================================================
if strtok('') <> '' then pause,end
//=================================================
if strtok('','') <> '' then pause,end
//=================================================
if strtok('','a') <> '' then pause,end
if strtok('a') <> '' then pause,end
//=================================================
TOKENS = [];
token = strtok("A string of ,,tokens and some  more tokens"," ,");
TOKENS = [TOKENS,token];
while( token <> '' )
  token = strtok(" ,");
  TOKENS = [TOKENS,token];
end
REF = 'A string of tokens and some more tokens ';
if strcat(TOKENS,' ')<> REF then pause,end
//=================================================