dos2unix

[pdclib] / functions / wctype / iswupper.c

diff --git a/functions/wctype/iswupper.c b/functions/wctype/iswupper.c
index eed40c7d3f1d58697801767ef652d184a1df02b8..4806a281b55b9039907fa8e1adbdd84442a545ca 100644 (file)
--- a/functions/wctype/iswupper.c
+++ b/functions/wctype/iswupper.c
@@ -1,31 +1,31 @@
-/* iswupper( wint_t )\r
-\r
-   This file is part of the Public Domain C Library (PDCLib).\r
-   Permission is granted to use, modify, and / or redistribute at will.\r
-*/\r
-\r
-#include <wctype.h>\r
-#ifndef REGTEST\r
-#include "_PDCLIB_locale.h"\r
-\r
-int iswupper( wint_t wc )\r
-{\r
-    return iswctype( wc, _PDCLIB_CTYPE_UPPER );\r
-}\r
-\r
-#endif\r
-\r
-#ifdef TEST\r
-#include "_PDCLIB_test.h"\r
-\r
-int main( void )\r
-{\r
-    TESTCASE(!iswupper(L'a'));\r
-    TESTCASE(!iswupper(L'e'));\r
-    TESTCASE(!iswupper(L'z'));\r
-    TESTCASE(iswupper(L'A'));\r
-    TESTCASE(iswupper(L'E'));\r
-    TESTCASE(iswupper(L'Z'));\r
-    return TEST_RESULTS;\r
-}\r
-#endif\r
+/* iswupper( wint_t )
+
+   This file is part of the Public Domain C Library (PDCLib).
+   Permission is granted to use, modify, and / or redistribute at will.
+*/
+
+#include <wctype.h>
+#ifndef REGTEST
+#include "_PDCLIB_locale.h"
+
+int iswupper( wint_t wc )
+{
+    return iswctype( wc, _PDCLIB_CTYPE_UPPER );
+}
+
+#endif
+
+#ifdef TEST
+#include "_PDCLIB_test.h"
+
+int main( void )
+{
+    TESTCASE(!iswupper(L'a'));
+    TESTCASE(!iswupper(L'e'));
+    TESTCASE(!iswupper(L'z'));
+    TESTCASE(iswupper(L'A'));
+    TESTCASE(iswupper(L'E'));
+    TESTCASE(iswupper(L'Z'));
+    return TEST_RESULTS;
+}
+#endif