Fix sets

[janwirth]

-- [decgen-start]
type alias A = Set.Set Int
type alias Rec = {set : Set.Set Int}

-- [decgen-generated-start] -- DO NOT MODIFY or remove this line
decodeA =
   Decode.map Set.Set Decode.int

decodeRec =
   Decode.map
      Rec
         ( Decode.field "set" decodeSet.SetInt )

encodeA (Set.Set a1) =
   Encode.int a1

encodeRec a =
   Encode.object
      [ ("set", encodeSet.SetInt a.set)
      ] 
-- [decgen-end]