Add win32 dynamic loading.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@3034 72102866-910b-0410-8b05-ffd578937521

Source/win32-load.h

@@ -0,0 +1,77 @@
+/*
+    win32-load - Definitions and translations for dynamic loading with 
+	the windows.
+
+    Copyright (C) 1998, Free Software Foundation
+
+*/
+
+#ifndef __win32_load_h_INCLUDE
+#define __win32_load_h_INCLUDE
+
+#include <windows.h>
+
+/* This is the GNU name for the CTOR list */
+#define CTOR_LIST       ""
+
+/* Types defined appropriately for the dynamic linker */
+typedef HINSTANCE dl_handle_t;
+typedef void* dl_symbol_t;
+
+/* Do any initialization necessary.  Return 0 on success (or
+   if no initialization needed. 
+*/
+static int 
+__objc_dynamic_init(const char* exec_path)
+{
+    return 0;
+}
+
+/* Link in the module given by the name 'module'.  Return a handle which can
+   be used to get information about the loded code.
+*/
+static dl_handle_t
+__objc_dynamic_link(const char* module, int mode, const char* debug_file)
+{
+    return LoadLibraryEx(module, 0, 0);
+}
+
+/* Return the address of a symbol given by the name 'symbol' from the module
+   associated with 'handle'
+*/
+static dl_symbol_t 
+__objc_dynamic_find_symbol(dl_handle_t handle, const char* symbol)
+{
+    return NULL;
+}
+
+/* remove the code from memory associated with the module 'handle' */
+static int 
+__objc_dynamic_unlink(dl_handle_t handle)
+{
+    return 0;
+}
+
+/* Print an error message (prefaced by 'error_string') relevant to the
+   last error encountered
+*/
+static void 
+__objc_dynamic_error(FILE *error_stream, const char *error_string)
+{
+    fprintf(error_stream, "%s:%d\n", error_string, GetLastError());
+}
+
+/* Debugging:  define these if they are available */
+static int 
+__objc_dynamic_undefined_symbol_count(void)
+{
+    return 0;
+}
+
+static char** 
+__objc_dynamic_list_undefined_symbols(void)
+{
+    return NULL;
+}
+
+#endif /* __sunos_load_h_INCLUDE */