[Dotgnu-pnet-commits] CVS: pnet/support dynlib.c,1.3,1.4

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/support
In directory subversions:/tmp/cvs-serv29010/support

Modified Files:
        dynlib.c 
Log Message:


Add support for Win32 dynamic libraries.


Index: dynlib.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/support/dynlib.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** dynlib.c    28 Jun 2002 12:33:04 -0000      1.3
--- dynlib.c    6 Mar 2003 04:53:42 -0000       1.4
***************
*** 114,117 ****
--- 114,147 ----
  }
  
+ #elif defined(IL_WIN32_NATIVE)        /* Native Win32 */
+ 
+ void *ILDynLibraryOpen(const char *name)
+ {
+       void *libHandle = (void *)LoadLibrary(name);
+       if(libHandle == 0)
+       {
+               fprintf(stderr, "%s: could not load dynamic library\n", name);
+               return 0;
+       }
+       return libHandle;
+ }
+ 
+ void ILDynLibraryClose(void *handle)
+ {
+       FreeLibrary((HINSTANCE)handle);
+ }
+ 
+ void *ILDynLibraryGetSymbol(void *handle, const char *symbol)
+ {
+       void *procAddr;
+       procAddr = (void *)GetProcAddress((HINSTANCE)handle, symbol);
+       if(procAddr == 0)
+       {
+               fprintf(stderr, "%s: could not resolve symbol", symbol);
+               return 0;
+       }
+       return procAddr;
+ }
+ 
  #else /* No dynamic library support */