mirror of
https://github.com/Mesabloo/diagnose.git
synced 2024-08-17 07:10:35 +03:00
fix small bug
This commit is contained in:
parent
c9114b0634
commit
f8badb4d8c
@ -5,7 +5,7 @@ cabal-version: 1.12
|
||||
-- see: https://github.com/sol/hpack
|
||||
|
||||
name: diagnose
|
||||
version: 2.3.0
|
||||
version: 2.3.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.
|
||||
|
@ -1,5 +1,5 @@
|
||||
name: diagnose
|
||||
version: 2.3.0
|
||||
version: 2.3.1
|
||||
github: "mesabloo/diagnose"
|
||||
license: BSD3
|
||||
author: "Ghilain Bergeron"
|
||||
|
@ -69,8 +69,8 @@ instance ToJSON msg => ToJSON (Diagnostic msg) where
|
||||
|
||||
-- | Checks whether the given diagnostic has any report or not (if it is effectively empty).
|
||||
hasReports :: Diagnostic msg -> Bool
|
||||
hasReports (Diagnostic DL.Nil _) = True
|
||||
hasReports _ = False
|
||||
hasReports (Diagnostic DL.Nil _) = False
|
||||
hasReports _ = True
|
||||
|
||||
-- | Transforms every warning report in this diagnostic into an error report.
|
||||
warningsToErrors :: Diagnostic msg -> Diagnostic msg
|
||||
|
Loading…
Reference in New Issue
Block a user