Wie verlinke ich ein Paket mit einer proprietären DLL?

Question

Ich schreibe ein Haskell-Paket, das von einer proprietären DLL abhängt. Ich benutze auch stack Werkzeug. Die Bibliothek verfügt über x86- und x64-Versionen. Nach this issue kann ich es nicht tun, indem Sie .cabal Datei ändern. Also versuche ich es zu tun, indem ich Setup.hs aktualisiere. Das ist mein Setup-Skript:

import Distribution.Simple 
import Distribution.PackageDescription 
import Distribution.Simple.LocalBuildInfo 
import System.Directory 

updateExtraLibDirs :: LocalBuildInfo -> IO LocalBuildInfo 
updateExtraLibDirs localBuildInfo = do 
    let packageDescription = localPkgDescr localBuildInfo 
     test = head $ testSuites packageDescription 
     testBuild = testBuildInfo test 
    dir <- getCurrentDirectory 
    print $ length $ testSuites packageDescription 
    return localBuildInfo { 
     localPkgDescr = packageDescription { 
      testSuites = [ test { 
       testBuildInfo = testBuild { 
        extraLibDirs = (dir ++ "\\lib") : extraLibDirs testBuild, 
        extraLibs = ("txmlconnector64.dll") : extraLibs testBuild 
       } 
      } ] 
     } 
    } 


main = defaultMainWithHooks simpleUserHooks { 
      confHook = \a f -> confHook simpleUserHooks a f >>= updateExtraLibDirs 
      } 

Dann rufe ich:

> stack test 

Dies führt immer noch zu undefinierten Referenzen während der Test-Suite-Verknüpfung. Warum?

Answer 1

Nur zwei Schritte:

1. ersetzen "txmlconnector64.dll" mit "txmlconnector64"
2. In .cabal Datei gesetzt build-type: Custom es zu ermöglichen, Ihre Setup.hs