diff options
Diffstat (limited to 'src/Language/Fiddle/Compiler.hs')
| -rw-r--r-- | src/Language/Fiddle/Compiler.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Language/Fiddle/Compiler.hs b/src/Language/Fiddle/Compiler.hs index 571c7b0..afe8f64 100644 --- a/src/Language/Fiddle/Compiler.hs +++ b/src/Language/Fiddle/Compiler.hs @@ -201,6 +201,7 @@ coloredFormat = DiagnosticFormat $ \diags -> -- | Prints a list of diagnostics to 'stderr' using the specified -- diagnostic format. printDiagnostics :: DiagnosticFormat -> [Diagnostic] -> IO () +printDiagnostics _ [] = return () printDiagnostics fmt d = hPutStrLn stderr (diagnosticsToString fmt d) -- | Prints a single diagnostic to 'stderr' using the 'coloredFormat' |