X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=functions%2Fstring%2Fstrtok.c;h=691c640cac060bf4cbc16ed79adc660ff21bde2b;hp=c586b97eea2cb7d01af9ece6e50454f9a7146019;hb=ebeb585aade62e51dc7b7ddd5de66473f81febfd;hpb=c07ec996170cb522e4ac8179c332dfbca2d8de5b

diff --git a/functions/string/strtok.c b/functions/string/strtok.c
index c586b97..691c640 100644
--- a/functions/string/strtok.c
+++ b/functions/string/strtok.c
@@ -91,6 +91,16 @@ int main( void )
     TESTCASE( s[7] == 'd' );
     TESTCASE( s[8] == '\0' );
     TESTCASE( strtok( NULL, "_" ) == NULL );
+    strcpy( s, "ab_cd" );
+    TESTCASE( strtok( s, "_" ) == &s[0] );
+    TESTCASE( s[0] == 'a' );
+    TESTCASE( s[1] == 'b' );
+    TESTCASE( s[2] == '\0' );
+    TESTCASE( strtok( NULL, "_" ) == &s[3] );
+    TESTCASE( s[3] == 'c' );
+    TESTCASE( s[4] == 'd' );
+    TESTCASE( s[5] == '\0' );
+    TESTCASE( strtok( NULL, "_" ) == NULL );
     return TEST_RESULTS;
 }
 #endif