diff options
| author | Hans Oesterholt-Dijkema <swig@elemental-programming.org> | 2006-09-17 20:55:27 +0000 |
|---|---|---|
| committer | Hans Oesterholt-Dijkema <swig@elemental-programming.org> | 2006-09-17 20:55:27 +0000 |
| commit | c0082db527a87e5d798324931a1575658b3f0e2d (patch) | |
| tree | 6ae78ed9b49f71e1995c6ab09010fd5a4bfa296e /Lib/mzscheme | |
| parent | f0e3702a262fb249abc1b3d6daa50cc9857c77e3 (diff) | |
| download | swig-c0082db527a87e5d798324931a1575658b3f0e2d.tar.gz | |
* Bug fix in the dynamic loading code of the mzscheme binding
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9293 626c5289-ae23-0410-ae9c-e8d60b6d4f22
Diffstat (limited to 'Lib/mzscheme')
| -rw-r--r-- | Lib/mzscheme/mzrun.swg | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Lib/mzscheme/mzrun.swg b/Lib/mzscheme/mzrun.swg index 6a71fb79a..3e0c9da65 100644 --- a/Lib/mzscheme/mzrun.swg +++ b/Lib/mzscheme/mzrun.swg @@ -402,10 +402,11 @@ SWIG_MzScheme_new_scheme_struct (Scheme_Env* env, const char* basename, for(k=0;mz_dynload_libpaths[k]!=NULL && mz_libraries[i]==NULL;k++) { int L=strlen(mz_dynload_libpaths[k])+strlen("\\")+strlen(mz_dlopen_libraries[i])+1; libp=(char *) malloc(L*sizeof(char)); - sprintf(libp,"%s\\%s",mz_dynload_libpaths[k],mz_dlopen_libraries[i]); #ifdef __OS_WIN32 + sprintf(libp,"%s\\%s",mz_dynload_libpaths[k],mz_dlopen_libraries[i]); mz_libraries[i]=(void *) LoadLibrary(libp); #else + sprintf(libp,"%s/%s",mz_dynload_libpaths[k],mz_dlopen_libraries[i]); mz_libraries[i]=(void *) dlopen(libp,RTLD_LAZY); #endif if (mz_dynload_debug) { |