diagnose/test/megaparsec/Instances.hs
2022-05-03 11:29:43 +02:00

12 lines
238 B
Haskell

{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
module Instances where
import Data.Void (Void)
import Error.Diagnose
import Error.Diagnose.Compat.Megaparsec
instance HasHints Void msg where
hints _ = mempty