[modified reducer sugar
ekmett@gmail.com**20090327001901] {
hunk ./Data/Monoid/Reducer/Sugar.hs 9
-import GHC.Exts hiding (IsString, fromString)
+import GHC.Exts hiding (fromString)
hunk ./Data/Monoid/Reducer/Sugar.hs 16
-class IsString a where
- fromString :: String -> a
-
-instance Reducer Char a => IsString a where
- fromString = reduce
+fromString :: Reducer Char m => String -> m
+fromString = reduce
hunk ./dist/doc/html/monoids/Data-Monoid-Reducer-Sugar.html 110
->class IsString a where
Source | |
|
:: IsString a => :: Reducer Char m => -> a | -> mData.Monoid.Reducer.SugarData.Monoid.Reducer.Sugarimport GHC.Exts hiding (IsString, fromString)
+import GHC.Exts hiding (fromString)
hunk ./dist/doc/html/monoids/src/Data-Monoid-Reducer-Sugar.html 24
-class IsString a where
- fromString :: String -> a
-
-instance Reducer Char a => IsString a where
- fromString = reduce
+fromString :: Reducer Char m => String -> m
+fromString = reduce
}
|