1 files changed, 71 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/miscellaneous/FreeEnvironmentStringsW/test2/test.cpp b/src/pal/tests/palsuite/miscellaneous/FreeEnvironmentStringsW/test2/test.cpp
new file mode 100644
index 0000000000..1bb05cdb12
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/FreeEnvironmentStringsW/test2/test.cpp
@@ -0,0 +1,71 @@
+// 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 FreeEnvironmentStringsW() function
+**
+**
+**=========================================================*/
+
+#define UNICODE
+#include <palsuite.h>
+
+int __cdecl main(int argc, char *argv[]) 
+{
+
+    WCHAR CapturedEnvironment[] = {'T','E','S','T','\0'};
+    BOOL TheResult = 0;
+    LPWSTR lpCapturedEnvironment = NULL;
+    
+    /*
+     * Initialize the PAL and return FAILURE if this fails
+     */
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+
+    lpCapturedEnvironment = (LPWSTR)malloc( sizeof(CapturedEnvironment) / 
+                                            sizeof(CapturedEnvironment[0]) );
+
+    if ( lpCapturedEnvironment )
+    {
+        memcpy( lpCapturedEnvironment, CapturedEnvironment, 
+                sizeof(CapturedEnvironment) / sizeof(CapturedEnvironment[0]) );
+    }
+    else
+    {
+        Fail( "malloc()  failed to allocate memory.\n" );
+    }
+    /* Even if this is not a valid Environment block, the function will 
+       still return success 
+    */
+  
+    TheResult = FreeEnvironmentStrings( lpCapturedEnvironment );
+    if(TheResult == 0) 
+    {
+        Fail("The function should still return a success value even if it is "
+             "passed a LPWSTR which is not an environment block properly "
+             "aquired from GetEnvironmentStrings\n");
+    }
+  
+    /* Even passing this function NULL, should still return a success value */
+    TheResult = FreeEnvironmentStrings(NULL);
+    if(TheResult == 0) 
+    {
+        Fail("The function should still return a success value even if pass "
+             "NULL.\n");    
+    }
+ 
+    
+    PAL_Terminate();
+    return PASS;
+}
+
+
+