module TreeGrepper.Result (Result (..)) where

import Data.Aeson (FromJSON)
import GHC.Generics (Generic)
import TreeGrepper.FileType (FileType)
import TreeGrepper.Match (Match)

data Result = Result
  { file :: String,
    file_type :: FileType,
    matches :: [Match]
  }
  deriving (Show, Generic)

instance FromJSON Result