X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstring%2Fstrcmp.c;h=8c51e93b627e6ef1c44f245fc238f4133828057a;hb=12e17136786afb1775c9dc946cbe41f5e230c24a;hp=17e138cdf2b989a389e385982112bbda9e6cd42f;hpb=e5456e3c2697c4e17fc9aa3439f2e305517b4d96;p=pdclib.old

diff --git a/functions/string/strcmp.c b/functions/string/strcmp.c
index 17e138c..8c51e93 100644
--- a/functions/string/strcmp.c
+++ b/functions/string/strcmp.c
@@ -1,38 +1,41 @@
-// ----------------------------------------------------------------------------
-// $Id$
-// ----------------------------------------------------------------------------
-// Public Domain C Library - http://pdclib.sourceforge.net
-// This code is Public Domain. Use, modify, and redistribute at will.
-// ----------------------------------------------------------------------------
+/* $Id$ */
 
-int strcmp( const char * s1, const char * s2 ) { /* TODO */ };
+/* Release $Name$ */
 
-/* Therx code
+/* strcmp( const char *, const char * )
+
+   This file is part of the Public Domain C Library (PDCLib).
+   Permission is granted to use, modify, and / or redistribute at will.
+*/
+
+#include <string.h>
+
+#ifndef REGTEST
+
+int strcmp( const char * s1, const char * s2 )
 {
-    while ((*s1 != '\0') && (*s1 == *s2))
+    while ( ( *s1 ) && ( *s1 == *s2 ) )
     {
-        s1++;
-        s2++;
+        ++s1;
+        ++s2;
     }
-    return (*(unsigned char *) s1) - (*(unsigned char *) s2);
+    return ( *s1 - *s2 );
 }
-*/
 
-/* PDPC code - unreviewed
+#endif
+
+#ifdef TEST
+#include <_PDCLIB_test.h>
+
+int main( void )
 {
-    const unsigned char *p1;
-    const unsigned char *p2;
-    
-    p1 = (const unsigned char *)s1;
-    p2 = (const unsigned char *)s2;
-    while (*p1 != '\0')
-    {
-        if (*p1 < *p2) return (-1);
-        else if (*p1 > *p2) return (1);
-        p1++;
-        p2++;
-    }
-    if (*p2 == '\0') return (0);
-    else return (-1);
+    char cmpabcde[] = "abcde";
+    char empty[] = "";
+    TESTCASE( strcmp( abcde, cmpabcde ) == 0 );
+    TESTCASE( strcmp( abcde, abcdx ) < 0 );
+    TESTCASE( strcmp( abcdx, abcde ) > 0 );
+    TESTCASE( strcmp( empty, abcde ) < 0 );
+    TESTCASE( strcmp( abcde, empty ) > 0 );
+    return TEST_RESULTS;
 }
-*/
+#endif