diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-09-08 14:24:14 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-09-08 14:24:14 +0000 |
| commit | 55565d647cf2f0944f9254b319e8e233a5f532d8 (patch) | |
| tree | 6c2922ebacd05888e2e4105917b39bc0a0ebf067 /rts | |
| parent | f34f333be856e8437e232fa413a284752c0ca83a (diff) | |
| download | haskell-55565d647cf2f0944f9254b319e8e233a5f532d8.tar.gz | |
FIX BUILD on non-Windows
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Linker.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index 26d671e6e9..3735a2e558 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -1091,16 +1091,17 @@ addDLL( char *dll_name ) opened_dlls = o_dll; return NULL; -# else - barf("addDLL: not implemented on this platform"); -# endif error: stgFree(buf); sysErrorBelch(dll_name); - + /* LoadLibrary failed; return a ptr to the error msg. */ return "addDLL: could not load DLL"; + +# else + barf("addDLL: not implemented on this platform"); +# endif } /* ----------------------------------------------------------------------------- |