on master help sign in
More instances
19f3446Michael Snoyman
Text/Libyaml.hs+3−3
@@ -33,6 +33,7 @@ import Foreign.C
33import Foreign.Ptr
33import Foreign.Ptr
34import Foreign.ForeignPtr
34import Foreign.ForeignPtr
35import Foreign.Marshal.Alloc
35import Foreign.Marshal.Alloc
36+import Data.Data
36
37
37#if MIN_VERSION_transformers(0,2,0)
38#if MIN_VERSION_transformers(0,2,0)
38import "transformers" Control.Monad.IO.Class
39import "transformers" Control.Monad.IO.Class
@@ -41,7 +42,6 @@ import "transformers" Control.Monad.Trans
41#endif
42#endif
42
43
43import Control.Exception (throwIO, Exception)
44import Control.Exception (throwIO, Exception)
44−import Data.Typeable (Typeable)
45import Data.Iteratee
45import Data.Iteratee
46import qualified Data.Iteratee.Base.StreamChunk as SC
46import qualified Data.Iteratee.Base.StreamChunk as SC
47import Control.Applicative
47import Control.Applicative
@@ -68,7 +68,7 @@ data Style = Any
68 | DoubleQuoted
68 | DoubleQuoted
69 | Literal
69 | Literal
70 | Folded
70 | Folded
71− deriving (Show, Eq, Enum, Bounded, Ord)
71+ deriving (Show, Read, Eq, Enum, Bounded, Ord, Data, Typeable)
72
72
73data Tag = StrTag
73data Tag = StrTag
74 | FloatTag
74 | FloatTag
@@ -80,7 +80,7 @@ data Tag = StrTag
80 | MapTag
80 | MapTag
81 | UriTag String
81 | UriTag String
82 | NoTag
82 | NoTag
83− deriving (Show, Eq)
83+ deriving (Show, Eq, Read, Data, Typeable)
84
84
85type AnchorName = String
85type AnchorName = String
86type Anchor = Maybe AnchorName
86type Anchor = Maybe AnchorName