Commits

Bryan O'Sullivan committed 6b58201 Merge

Merge

  • Participants
  • Parent commits 8022eae, 95174b1

Comments (0)

Files changed (1)

File Data/Aeson/Generic.hs

         decodeArgs c0 = go (numConstrArgs (resType generic) c0) c0
                            (constrFields c0)
          where
+          go 0 c _        Null       = construct c []
           go 1 c []       jd         = construct c [jd] -- unary constructor
           go _ c []       (Array js) = construct c (V.toList js) -- no field names
           -- FIXME? We could allow reading an array into a constructor