diff options
Diffstat (limited to 'testsuite/tests/lib/integer/integerGcdExt.hs')
| -rw-r--r-- | testsuite/tests/lib/integer/integerGcdExt.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/lib/integer/integerGcdExt.hs b/testsuite/tests/lib/integer/integerGcdExt.hs index d060c2d3b2..2457b1ced2 100644 --- a/testsuite/tests/lib/integer/integerGcdExt.hs +++ b/testsuite/tests/lib/integer/integerGcdExt.hs @@ -9,10 +9,10 @@ import Control.Monad import GHC.Word import GHC.Base -import qualified GHC.Integer.GMP.Internals as I +import qualified GHC.Num.Integer as I gcdExtInteger :: Integer -> Integer -> (Integer, Integer) -gcdExtInteger a b = case I.gcdExtInteger a b of (# g, s #) -> (g, s) +gcdExtInteger a b = case I.integerGcde a b of ( g, s, _t ) -> (g, s) main :: IO () main = do |