-// ----------------------------------------------------------------------------
-// $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 */ };
+/* strcmp( const char *, const char * )
-/* Therx code
+ 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 ( *(unsigned char *)s1 - *(unsigned char *)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 cmpabcd_[] = "abcd\xfc";
+ 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 );
+ TESTCASE( strcmp( abcde, cmpabcd_ ) < 0 );
+ return TEST_RESULTS;
}
-*/
+#endif