[commit: ghc] master: hadrian: Pass integer_backend to testsuite driver (442be69)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/442be690e1ca162e22d632df695c29f90625f33e/ghc

>---------------------------------------------------------------

commit 442be690e1ca162e22d632df695c29f90625f33e
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Fri Dec 14 15:11:54 2018 -0500

    hadrian: Pass integer_backend to testsuite driver


>---------------------------------------------------------------

442be690e1ca162e22d632df695c29f90625f33e
 hadrian/src/Settings/Builders/RunTest.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/hadrian/src/Settings/Builders/RunTest.hs b/hadrian/src/Settings/Builders/RunTest.hs
index 6188b64..8312592 100644
--- a/hadrian/src/Settings/Builders/RunTest.hs
+++ b/hadrian/src/Settings/Builders/RunTest.hs
@@ -81,6 +81,7 @@ runTestBuilderArgs = builder RunTest ? do
     top         <- expr $ topDirectory
     ghcFlags    <- expr runTestGhcFlags
     timeoutProg <- expr buildRoot <&> (-/- timeoutPath)
+    integerLib  <- expr (integerLibrary flav)
 
     let asZeroOne s b = s ++ zeroOne b
 
@@ -110,6 +111,7 @@ runTestBuilderArgs = builder RunTest ? do
 
             , arg "-e", arg $ "config.ghc_dynamic_by_default=" ++ show hasDynamicByDefault
             , arg "-e", arg $ "config.ghc_dynamic=" ++ show hasDynamic
+            , arg "-e", arg $ "config.integer_backend=" ++ show (pkgName integerLib)
 
             -- Use default value, see:
             -- https://github.com/ghc/ghc/blob/master/testsuite/mk/boilerplate.mk