Changeset d1e986 in git

Timestamp:

Feb 1, 2001, 2:12:09 PM (23 years ago)

Author:

Kai Krüger <krueger@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

6f67d3965af57501ca475c3de6c367caa764d119

Parents:

2b74be90132ef9a12edba4ef7434f2b01c189899

Message:

Added dll for ix86-win


git-svn-id: file:///usr/local/Singular/svn/trunk@5159 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/mod_raw.cc (modified) (2 diffs)

Singular/mod_raw.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: mod_raw.cc,v 1.12 2000-12-21 16:37:52 obachman Exp $ */
+/* $Id: mod_raw.cc,v 1.13 2001-02-01 13:12:09 krueger Exp $ */
 /*
  * ABSTRACT: machine depend code for dynamic modules
@@ -311 +311 @@
  *****************************************************************************/
 #ifdef ix86_win
-/* #    include <> */
-
-void *dynl_open(char *filename)
-{
-  return(NULL);
-}
-
-void *dynl_sym(void *handle, char *symbol)
-{
-  return(NULL);
-}
-
-int dynl_close (void *handle)
-{
+#    include <windows.h>
+
+void *dynl_open(char *filename)
+{
+  HINSTANCE hLibrary = LoadLibrary( TEXT (filename));;
+
+  return(hLibrary);
+}
+
+void *dynl_sym(void *handle, char *symbol)
+{
+  FARPROC f;
+  
+  if (handle == DYNL_KERNEL_HANDLE) 
+    handle = PROG_HANDLE;
+
+  f = GetProcAddress(handle , TEXT (symbol));
+  return(f);
+}
+
+int dynl_close (void *handle)
+{
+  FreeLibrary(handle);
   return(0);
 }