[Openmcl-cvs-notifications] r10714 - /trunk/source/lisp-kernel/pmcl-kernel.c

[gb at clozure.com]

Author: gb
Date: Fri Sep 12 02:02:17 2008
New Revision: 10714

Log:
open_shared_library: call windows_open_shared_library() on windows.

Modified:
    trunk/source/lisp-kernel/pmcl-kernel.c

Modified: trunk/source/lisp-kernel/pmcl-kernel.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/pmcl-kernel.c (original)
+++ trunk/source/lisp-kernel/pmcl-kernel.c Fri Sep 12 02:02:17 2008
@@ -1692,10 +1692,12 @@
 =

 #ifndef DARWIN
 #ifdef WINDOWS
+extern void *windows_open_shared_library(char *);
+
 void *
 xGetSharedLibrary(char *path, int mode)
 {
-  return NULL;                  /* fix this */
+  return windows_open_shared_library(path);
 }
 #else
 void *