Disable failing tests

Author: hamishmack

test/th-dlls/default.nix

@@ -7,6 +7,13 @@ let
   project = externalInterpreter: project' {
     inherit compiler-nix-name evalPackages;
     src = testSrc "th-dlls";
+    # TODO figure out why TH breaks with pkgsStatic for `libsodium` and `HsOpenSSL`
+    # `libsodium` fails with the unhandled ELF relocation(RelA) type 23
+    # `HsOpenSSL` segfaults in ghcizm9zi12zi2zminplace_GHCiziObjLink_resolveObjs1_info
+    cabalProjectLocal = lib.optionalString stdenv.hostPlatform.isStatic ''
+      package th-dlls
+        flags: -libsodium -openssl
+    '';
     modules = import ../modules.nix ++ [({pkgs, ...}: lib.optionalAttrs externalInterpreter {
       packages.th-dlls.components.library.ghcOptions = [ "-fexternal-interpreter" ];
       # Static openssl seems to fail to load in iserv for musl

test/th-dlls/src/Lib.hs

@@ -1,14 +1,30 @@
+{-# LANGUAGE CPP #-}
 {-# LANGUAGE TemplateHaskell #-}
 module Lib where
 
 import Control.Monad.IO.Class (liftIO)
+import Language.Haskell.TH.Syntax (Exp(..), Lit(..))
+import Data.Text as T
+
+#ifdef MIN_VERSION_HsOpenSSL
 import OpenSSL (withOpenSSL)
 import OpenSSL.BN (withBN)
+#endif
+
+#ifdef MIN_VERSION_libsodium
 import Libsodium (sodium_init)
-import Language.Haskell.TH.Syntax (Exp(..), Lit(..))
-import Data.Text as T
+#endif
+
+#ifdef MIN_VERSION_double_conversion
 import Data.Double.Conversion.Text (toShortest)
+#endif
 
+#ifdef MIN_VERSION_HsOpenSSL
 x = $(liftIO (withOpenSSL (withBN 0 (\_ -> return (LitE (IntegerL 0))))))
+#endif
+#ifdef MIN_VERSION_libsodium
 y = $(liftIO (sodium_init >> return (LitE (IntegerL 0))))
+#endif
+#ifdef MIN_VERSION_double_conversion
 z = $(liftIO (return (LitE (IntegerL (fromIntegral (T.length (toShortest 1.0)))))))
+#endif

test/th-dlls/th-dlls.cabal

@@ -6,18 +6,37 @@ author:              Hamish Mackenzie
 maintainer:          [email protected]
 build-type:          Simple
 
+flag libsodium
+  description:         Enable libsodium support
+  default:             True
+  manual:              True
+
+flag openssl
+  description:         Enable OpenSSL support
+  default:             True
+  manual:              True
+
+flag double-conversion
+  description:         Enable double-conversion support
+  default:             True
+  manual:              True
+
 library
-  build-depends:       base
-                     , HsOpenSSL
-                     , libsodium
-                     , template-haskell
-                     , text
-                     , double-conversion
-                     , unix-time
-                     , th-orphans
-                     , ghc-prim
-                     , math-functions
-                     , erf
+  build-depends:
+      base
+    , template-haskell
+    , text
+    , unix-time
+    , th-orphans
+    , ghc-prim
+    , math-functions
+    , erf
+  if flag(openssl)
+    build-depends: HsOpenSSL
+  if flag(libsodium)
+    build-depends: libsodium
+  if flag(double-conversion)
+    build-depends: double-conversion
   exposed-modules:     Lib
   hs-source-dirs:      src
   default-language:    Haskell2010