Imported Upstream version 1.1.0upstream/1.1.0

1 files changed, 66 insertions, 0 deletions

diff --git a/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c
new file mode 100644
index 0000000000..ffc153f5e6
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CharNextExA/test2/test.c
@@ -0,0 +1,66 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+// See the LICENSE file in the project root for more information.
+
+/*============================================================
+**
+** Source: test.c
+**
+** Purpose: Test for CharNextExA, ensures it returns an LPTSTR
+**
+**
+**=========================================================*/
+
+/* Depends on strcmp() */
+
+#include <palsuite.h>
+
+void testString(LPSTR input, LPSTR expected)
+{
+
+    LPTSTR pReturned = NULL;
+
+    pReturned = CharNextExA(0,input,0);
+
+    /* Compare the Returned String to what it should be */
+    if(strcmp(expected,pReturned) != 0) 
+    {
+        Fail("ERROR: CharNextExA Failed: [%s] and [%s] are not equal, "
+            "they should be after calling CharNextExA.\n",
+            pReturned,expected);
+    }
+
+
+}
+
+int __cdecl main(int argc, char *argv[]) 
+{
+
+    /*
+     * Initialize the PAL and return FAILURE if this fails
+     */
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+
+    /* test several Strings */
+    testString("this is the string", "his is the string");  
+    testString("t", "");  
+    testString("", ""); 
+    testString("a\t", "\t"); 
+    testString("a\a", "\a");
+    testString("a\b", "\b");
+    testString("a\"", "\"");
+    testString("a\\", "\\");
+    testString("\\", "");
+    testString("\f", "");
+    testString("\bx", "x");
+    
+    PAL_Terminate();
+    return PASS;
+}
+
+
+