1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
| :browse Data.Object.Yaml
class (Eq a) => IsYamlScalar a where
fromYamlScalar :: YamlScalar -> a
toYamlScalar :: a -> YamlScalar
data ParseException
= NonScalarKey
| UnknownAlias {_anchorName :: Text.Libyaml.AnchorName}
| UnexpectedEvent {_received :: Maybe Text.Libyaml.Event,
_expected :: Maybe Text.Libyaml.Event}
| InvalidYaml (Maybe String)
type YamlObject = Data.Object.Object YamlScalar YamlScalar
data YamlScalar
= YamlScalar {value :: Data.ByteString.Internal.ByteString,
tag :: Text.Libyaml.Tag,
style :: Text.Libyaml.Style}
data ParseException
= ... | UnknownAlias {_anchorName :: Text.Libyaml.AnchorName} | ...
data ParseException
= ...
| UnexpectedEvent {..., _expected :: Maybe Text.Libyaml.Event}
| ...
data ParseException
= ...
| UnexpectedEvent {_received :: Maybe Text.Libyaml.Event, ...}
| ...
decode ::
(Control.Failure.Failure ParseException m,
IsYamlScalar k,
IsYamlScalar v) =>
Data.ByteString.Internal.ByteString -> m (Data.Object.Object k v)
decodeFile ::
(Control.Failure.Failure ParseException m,
IsYamlScalar k,
IsYamlScalar v) =>
FilePath -> IO (m (Data.Object.Object k v))
encode ::
(IsYamlScalar k, IsYamlScalar v) =>
Data.Object.Object k v -> Data.ByteString.Internal.ByteString
encodeFile ::
(IsYamlScalar k, IsYamlScalar v) =>
FilePath -> Data.Object.Object k v -> IO ()
fromYamlObject ::
(IsYamlScalar k, IsYamlScalar v) =>
YamlObject -> Data.Object.Object k v
data YamlScalar = YamlScalar {..., style :: Text.Libyaml.Style}
data YamlScalar = YamlScalar {..., tag :: Text.Libyaml.Tag, ...}
toYamlObject ::
(IsYamlScalar k, IsYamlScalar v) =>
Data.Object.Object k v -> YamlObject
data YamlScalar
= YamlScalar {value :: Data.ByteString.Internal.ByteString, ...} |
Partager