1 files changed, 64 insertions, 0 deletions
diff --git a/src/pal/tests/palsuite/miscellaneous/CloseHandle/test1/test.c b/src/pal/tests/palsuite/miscellaneous/CloseHandle/test1/test.c
new file mode 100644
index 0000000000..8e42229c29
--- /dev/null
+++ b/src/pal/tests/palsuite/miscellaneous/CloseHandle/test1/test.c
@@ -0,0 +1,64 @@
+// 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 CloseHandle function
+**
+**
+**=========================================================*/
+
+/* Depends on: CreateFile and WriteFile */
+
+#include <palsuite.h>
+
+int __cdecl main(int argc, char *argv[])
+{
+
+    HANDLE FileHandle = NULL;
+    LPDWORD WriteBuffer; /* Used with WriteFile */
+
+    /*
+     * Initialize the PAL and return FAILURE if this fails
+     */
+
+    if(0 != (PAL_Initialize(argc, argv)))
+    {
+        return FAIL;
+    }
+
+    WriteBuffer = malloc(sizeof(WORD));
+    
+    if ( WriteBuffer == NULL )
+    {
+        Fail("ERROR: Failed to allocate memory for WriteBuffer pointer. "
+             "Can't properly exec test case without this.\n");
+    }
+                                     
+ 
+    /* Create a file, since this returns to us a HANDLE we can use */
+    FileHandle = CreateFile("testfile",   
+                            GENERIC_READ | GENERIC_WRITE,0,NULL,CREATE_ALWAYS,  
+                            FILE_ATTRIBUTE_NORMAL,          
+                            NULL);
+  
+    /* Should be able to close this handle */
+    if(CloseHandle(FileHandle) == 0)
+    {
+	free(WriteBuffer);
+        Fail("ERROR: (Test 1) Attempted to close a HANDLE on a file, but the "
+             "return value was <=0, indicating failure.\n");    
+    }
+  
+    free(WriteBuffer);
+    
+    PAL_Terminate();
+    return PASS;
+}
+
+
+
+