diff --git a/src/Data/HugeInt.purs b/src/Data/HugeInt.purs index 3472d23..5734a74 100644 --- a/src/Data/HugeInt.purs +++ b/src/Data/HugeInt.purs @@ -19,6 +19,7 @@ module Data.HugeInt import Prelude import Data.String (length, drop, takeWhile) +import Data.Generic (class Generic) import Data.Int (toNumber) import Data.Int (round) as Int import Data.Maybe (Maybe(..)) @@ -27,6 +28,8 @@ import Data.HugeNum as HN newtype HugeInt = HugeInt HugeNum +derive instance genericHugeInt :: Generic HugeInt + instance eqHugeInt :: Eq HugeInt where eq (HugeInt h1) (HugeInt h2) = h1 == h2