Auto derive aeson ToJSON instance

gistfile1.hs

{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE DeriveGeneric #-}

module Lib
where

import Data.Aeson
import GHC.Generics (Generic)
import Data.Stringable

someFunc :: IO ()
someFunc = putStrLn "someFunc"

data Foo = Foo { name :: String, number :: Int }
  deriving (Generic)

instance ToJSON Foo

test1 = do
  putStrLn $ toString (encode $ Foo "hello" 123)