Skip to content
Browse files

Add instance for Ratio

  • Loading branch information...
1 parent 381e397 commit 6756e12a1e9ab3dddeef425ae0adfbb8d077d9ce @feuerbach committed Mar 15, 2013
Showing with 2 additions and 0 deletions.
  1. +2 −0 Data/Generics/Traversable/Instances.hs
2 Data/Generics/Traversable/Instances.hs
@@ -6,13 +6,15 @@ module Data.Generics.Traversable.Instances () where
import Data.Generics.Traversable.Core
import Data.Generics.Traversable.TH
import Control.Applicative
+import Data.Ratio
instance c () => GTraversable c ()
instance c Bool => GTraversable c Bool
instance c Int => GTraversable c Int
instance c Integer => GTraversable c Integer
instance c Float => GTraversable c Float
instance c Double => GTraversable c Double
+instance c (Ratio n) => GTraversable c (Ratio n)
instance c Char => GTraversable c Char
instance c Ordering => GTraversable c Ordering

0 comments on commit 6756e12

Please sign in to comment.
Something went wrong with that request. Please try again.