@@ -19,16 +19,14 @@ type DL = HMODULE
21hostDynamicLibExt :: String
21hostDynamicLibExt :: String
22−#ifdef linux_HOST_OS
22+#if defined(linux_HOST_OS) || defined(freebsd_HOST_OS) \
23+ || defined(dragonfly_HOST_OS) || defined(openbsd_HOST_OS) \
24+ || defined(netbsd_HOST_OS)
23hostDynamicLibExt = "so"
25hostDynamicLibExt = "so"
24−#elif darwin_HOST_OS
26+#elif defined(darwin_HOST_OS)
25hostDynamicLibExt = "dylib"
27hostDynamicLibExt = "dylib"
26−#elif mingw32_HOST_OS
28+#elif defined(mingw32_HOST_OS)
27hostDynamicLibExt = "dll"
29hostDynamicLibExt = "dll"
29−hostDynamicLibExt = "so"
30−#elif dragonfly_HOST_OS
31−hostDynamicLibExt = "so"
33hostDynamicLibExt = error $ unwords
31hostDynamicLibExt = error $ unwords
34 [ "Undefined file extension for dynamic libraries"
32 [ "Undefined file extension for dynamic libraries"