X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=functions%2Fstring%2Fstrcspn.c;h=baf8fc799a6a2dd3cba0e41fefbb8564c29acd55;hp=7c4d9b8c58054576394f2111ed88d259de8943aa;hb=da0f3f353d417fed71f358a48d5d5394145e460d;hpb=1d9d92ba957a0b8307c9a65c35867fde68e6533b

diff --git a/functions/string/strcspn.c b/functions/string/strcspn.c
index 7c4d9b8..baf8fc7 100644
--- a/functions/string/strcspn.c
+++ b/functions/string/strcspn.c
@@ -1,22 +1,23 @@
-/* ----------------------------------------------------------------------------
- * $Id$
- * ----------------------------------------------------------------------------
- * Public Domain C Library - http://pdclib.sourceforge.net
- * This code is Public Domain. Use, modify, and redistribute at will.
- * --------------------------------------------------------------------------*/
+/* strcspn( const char *, const char * )
 
-#include <__size_t.h>
+   This file is part of the Public Domain C Library (PDCLib).
+   Permission is granted to use, modify, and / or redistribute at will.
+*/
 
-size_t strcspn( const char * src_1, const char * src_2 )
+#include <string.h>
+
+#ifndef REGTEST
+
+size_t strcspn( const char * s1, const char * s2 )
 {
     size_t len = 0;
-    const char * src_p;
-    while ( src_1[len] != '\0' )
+    const char * p;
+    while ( s1[len] )
     {
-        src_p = src_2;
-        while ( *src_p != '\0' )
+        p = s2;
+        while ( *p )
         {
-            if ( src_1[len] == *src_p++ )
+            if ( s1[len] == *p++ )
             {
                 return len;
             }
@@ -25,3 +26,23 @@ size_t strcspn( const char * src_1, const char * src_2 )
     }
     return len;
 }
+
+#endif
+
+#ifdef TEST
+#include "_PDCLIB_test.h"
+
+int main( void )
+{
+    TESTCASE( strcspn( abcde, "x" ) == 5 );
+    TESTCASE( strcspn( abcde, "xyz" ) == 5 );
+    TESTCASE( strcspn( abcde, "zyx" ) == 5 );
+    TESTCASE( strcspn( abcdx, "x" ) == 4 );
+    TESTCASE( strcspn( abcdx, "xyz" ) == 4 );
+    TESTCASE( strcspn( abcdx, "zyx" ) == 4 );
+    TESTCASE( strcspn( abcde, "a" ) == 0 );
+    TESTCASE( strcspn( abcde, "abc" ) == 0 );
+    TESTCASE( strcspn( abcde, "cba" ) == 0 );
+    return TEST_RESULTS;
+}
+#endif