diff --git a/GHC/Integer.lhs b/GHC/Integer.lhs index 290b27a178f903bf0e78455ab7dc3a005cf07393..626ae124c2a689cb03e8f14a0ca4460ad36c74a0 100644 --- a/GHC/Integer.lhs +++ b/GHC/Integer.lhs @@ -60,9 +60,9 @@ import GHC.Prim ( and#, or#, xor# ) -import GHC.Integer.GMP.Internals ( - Integer(..), +import GHC.Integer.Type ( Integer(..) ) +import GHC.Integer.GMP.Internals ( -- GMP-related primitives cmpInteger#, cmpIntegerInt#, plusInteger#, minusInteger#, timesInteger#, diff --git a/GHC/Integer/GMP/Internals.hs b/GHC/Integer/GMP/Internals.hs index b2f52c42e068f3200408c8d6ffb207d52ee1c01f..b88a9d3c4a06262280e00945a7461bf26d6be24b 100644 --- a/GHC/Integer/GMP/Internals.hs +++ b/GHC/Integer/GMP/Internals.hs @@ -5,8 +5,6 @@ #include "MachDeps.h" module GHC.Integer.GMP.Internals ( - Integer(..), - cmpInteger#, cmpIntegerInt#, @@ -52,7 +50,6 @@ module GHC.Integer.GMP.Internals ( ) where import GHC.Prim -import GHC.Integer.Type -- Double isn't available yet, and we shouldn't be using defaults anyway: default ()