Merged PDPCLIB and Therx code.

[pdclib] / functions / string / strspn.c

diff --git a/functions/string/strspn.c b/functions/string/strspn.c
index 47b28618b7a0004072d85fb0a0171b5c1957f3ff..6b0e586b79f661152d774d7ccbb1c28888649628 100644 (file)
--- a/functions/string/strspn.c
+++ b/functions/string/strspn.c
@@ -6,3 +6,24 @@
 // ----------------------------------------------------------------------------
 
 size_t strspn( const char * s1, const char * s2 ) { /* TODO */ };
+
+/* PDPC code - unreviewed
+{
+    const char *p1;
+    const char *p2;
+    
+    p1 = s1;
+    while (*p1 != '\0')
+    {
+        p2 = s2;
+        while (*p2 != '\0')
+        {
+            if (*p1 == *p2) break;
+            p2++;
+        }
+        if (*p2 == '\0') return ((size_t)(p1 - s1));
+        p1++;
+    }
+    return ((size_t)(p1 - s1));
+}
+*/