diff options
Diffstat (limited to 'ddl/out/purescript/LambdaCube/PipelineSchema.purs')
-rw-r--r-- | ddl/out/purescript/LambdaCube/PipelineSchema.purs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ddl/out/purescript/LambdaCube/PipelineSchema.purs b/ddl/out/purescript/LambdaCube/PipelineSchema.purs index 057c6c6..bab2a91 100644 --- a/ddl/out/purescript/LambdaCube/PipelineSchema.purs +++ b/ddl/out/purescript/LambdaCube/PipelineSchema.purs | |||
@@ -1,5 +1,5 @@ | |||
1 | -- generated file, do not modify! | 1 | -- generated file, do not modify! |
2 | -- 2016-11-15T13:20:49.544037000000Z | 2 | -- 2016-11-15T20:33:23.372931000000Z |
3 | 3 | ||
4 | module LambdaCube.PipelineSchema where | 4 | module LambdaCube.PipelineSchema where |
5 | import Prelude | 5 | import Prelude |
@@ -62,7 +62,6 @@ derive instance genericStreamType :: Generic StreamType | |||
62 | instance showStreamType :: Show StreamType where show = gShow | 62 | instance showStreamType :: Show StreamType where show = gShow |
63 | instance eqStreamType :: Eq StreamType where eq = gEq | 63 | instance eqStreamType :: Eq StreamType where eq = gEq |
64 | 64 | ||
65 | |||
66 | instance encodeJsonStreamType :: EncodeJson StreamType where | 65 | instance encodeJsonStreamType :: EncodeJson StreamType where |
67 | encodeJson v = case v of | 66 | encodeJson v = case v of |
68 | Attribute_Word -> "tag" := "Attribute_Word" ~> jsonEmptyObject | 67 | Attribute_Word -> "tag" := "Attribute_Word" ~> jsonEmptyObject |