Skip to content

Instantly share code, notes, and snippets.

@rikvdkleij
Last active October 9, 2016 20:20
Show Gist options
  • Save rikvdkleij/f71cbf1e7f600530419878015af7e8c6 to your computer and use it in GitHub Desktop.
Save rikvdkleij/f71cbf1e7f600530419878015af7e8c6 to your computer and use it in GitHub Desktop.
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
module LocAt where
import Prelude
import Data.Aeson
import Data.Text
import GHC.Generics
data User =
User {_userId :: Int
,_userFirstName :: Text
,_userLastName :: Text}
deriving (Generic, ToJSON, FromJSON)
{-
:loc-at /home/rik/haskell/projects/api/src/LocAt.hs 14 37 14 45 FromJSON
src/LocAt.hs:(14,37)-(14,45)
:loc-at /home/rik/haskell/projects/api/src/LocAt.hs 14 29 14 35 ToJSON
aeson-0.11.2.1:Data.Aeson.Types.Class
-}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment