diagnose 2.5.0 → 2.5.1
raw patch · 3 files changed
+3/−3 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Error.Diagnose.Compat.Megaparsec: class HasHints e msg
+ Error.Diagnose.Compat.Megaparsec: diagnosticFromBundle :: forall msg s e. (IsString msg, Stream s, HasHints e msg, ShowErrorComponent e, VisualStream s, TraversableStream s) => (ParseError s e -> Bool) -> Maybe msg -> msg -> Maybe [Note msg] -> ParseErrorBundle s e -> Diagnostic msg
+ Error.Diagnose.Compat.Megaparsec: errorDiagnosticFromBundle :: forall msg s e. (IsString msg, Stream s, HasHints e msg, ShowErrorComponent e, VisualStream s, TraversableStream s) => Maybe msg -> msg -> Maybe [Note msg] -> ParseErrorBundle s e -> Diagnostic msg
+ Error.Diagnose.Compat.Megaparsec: hints :: HasHints e msg => e -> [Note msg]
+ Error.Diagnose.Compat.Megaparsec: warningDiagnosticFromBundle :: forall msg s e. (IsString msg, Stream s, HasHints e msg, ShowErrorComponent e, VisualStream s, TraversableStream s) => Maybe msg -> msg -> Maybe [Note msg] -> ParseErrorBundle s e -> Diagnostic msg
+ Error.Diagnose.Compat.Parsec: class HasHints e msg
+ Error.Diagnose.Compat.Parsec: diagnosticFromParseError :: forall msg. (IsString msg, HasHints Void msg) => (ParseError -> Bool) -> Maybe msg -> msg -> Maybe [Note msg] -> ParseError -> Diagnostic msg
+ Error.Diagnose.Compat.Parsec: errorDiagnosticFromParseError :: forall msg. (IsString msg, HasHints Void msg) => Maybe msg -> msg -> Maybe [Note msg] -> ParseError -> Diagnostic msg
+ Error.Diagnose.Compat.Parsec: hints :: HasHints e msg => e -> [Note msg]
+ Error.Diagnose.Compat.Parsec: warningDiagnosticFromParseError :: forall msg. (IsString msg, HasHints Void msg) => Maybe msg -> msg -> Maybe [Note msg] -> ParseError -> Diagnostic msg
+ Error.Diagnose.Diagnostic: diagnosticToJson :: ToJSON msg => Diagnostic msg -> ByteString
+ Error.Diagnose.Position: instance Data.Aeson.Types.ToJSON.ToJSON Error.Diagnose.Position.Position
Files
- diagnose.cabal +1/−1
- src/Error/Diagnose/Compat/Megaparsec.hs +1/−1
- src/Error/Diagnose/Compat/Parsec.hs +1/−1
diagnose.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack name: diagnose-version: 2.5.0+version: 2.5.1 synopsis: Beautiful error reporting done easily description: This package provides a simple way of getting beautiful compiler/interpreter errors using a very simple interface for the programmer.
src/Error/Diagnose/Compat/Megaparsec.hs view
@@ -47,7 +47,7 @@ MP.ParseErrorBundle s e -> Diagnostic msg diagnosticFromBundle isError code msg (fromMaybe [] -> trivialHints) MP.ParseErrorBundle {..} =- foldl addReport def (toLabeledPosition <$> bundleErrors)+ foldl addReport mempty (toLabeledPosition <$> bundleErrors) where toLabeledPosition :: MP.ParseError s e -> Report msg toLabeledPosition error =
src/Error/Diagnose/Compat/Parsec.hs view
@@ -48,7 +48,7 @@ let pos = fromSourcePos $ PE.errorPos error markers = toMarkers pos $ PE.errorMessages error report = (if isError error then Err code msg else Warn code msg) markers (defaultHints <> hints (undefined :: Void))- in addReport def report+ in addReport mempty report where fromSourcePos :: PP.SourcePos -> Position fromSourcePos pos =