
Hi, please can you help me with following? I'm trying to parse one json (simplified version below), but I keep getting: "when expecting a record (:*:), encountered Array instead" code: ------------ data SomeData = SomeData { v1 :: Int, v2 :: Int } deriving (Show, Generic) data SomeDataPack = SomeDataPack{ pack :: [SomeData] } deriving (Show, Generic) instance FromJSON SomeData instance FromJSON SomeDataPack parsedata :: IO (Maybe SomeDataPack) parsedata = do let x = "[{\"v1\":11,\"v2\":12},{\"v1\":13,\"v2\":14}]"; case (eitherDecode' x :: Either String SomeDataPack) of Right r -> do putStrLn $ show r return $ Just r Left e -> do putStrLn $ show e return Nothing thanks, m.