Intero issue #260

{-# 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
-}