Comment lier un paquet avec une DLL propriétaire?

Question

J'écris un paquet Haskell qui dépend d'une DLL propriétaire. J'utilise aussi l'outil stack. La bibliothèque a des versions x86 et x64. Selon this issue je ne peux pas le faire en modifiant le fichier .cabal. Donc, je suis en train de le faire en mettant à jour Setup.hs. Ceci est mon script d'installation:

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 
      } 

Alors je l'appelle:

> stack test 

Cela conduit encore à des références non définies au cours de la liaison suite de tests. Pourquoi?

Answer 1

A deux pas:

1. Replace "txmlconnector64.dll" avec "txmlconnector64"
2. Dans le fichier .cabal mis en build-type: Custom pour lui permettre d'utiliser votre Setup.hs