Resuscitate VMS subsystem (yeah, you've correctly read: VMS!!) from revision 24496.

[reactos.git] / rossubsys / vms / server / dllmain.c

diff --git a/rossubsys/vms/server/dllmain.c b/rossubsys/vms/server/dllmain.c
new file mode 100644 (file)
index 0000000..61b87c6
--- /dev/null
+++ b/rossubsys/vms/server/dllmain.c
@@ -0,0 +1,50 @@
+/* $Id$
+ *
+ * dllmain.c - VMS Enviroment Subsystem Server
+ * 
+ * ReactOS Operating System
+ * 
+ * --------------------------------------------------------------------
+ *
+ * This software is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of the
+ * License, or (at your option) any later version.
+ *
+ * This software is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this software; see the file COPYING.LIB. If not, write
+ * to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge,
+ * MA 02139, USA.  
+ *
+ * --------------------------------------------------------------------
+ */
+#include "vmssrv.h"
+
+#define NDEBUG
+#include <debug.h>
+
+/* DLL entry point */
+
+HANDLE VmsSrvDllHandle = 0;
+
+/* FUNCTIONS *****************************************************************/
+
+BOOL STDCALL
+DllMain(HANDLE hDll,
+       DWORD dwReason,
+       LPVOID lpReserved)
+{
+  if (DLL_PROCESS_ATTACH == dwReason)
+    {
+      VmsSrvDllHandle = hDll;
+    }
+
+  return TRUE;
+}
+
+/* EOF */