@@ -753,7 +753,11 @@ prettyPrintMultipleErrors full = renderBox . prettyPrintMultipleErrorsBox full
753-- Pretty print multiple warnings
753-- Pretty print multiple warnings
755prettyPrintMultipleWarnings :: Bool -> MultipleErrors -> String
755prettyPrintMultipleWarnings :: Bool -> MultipleErrors -> String
756+prettyPrintMultipleWarnings full = renderBox . prettyPrintMultipleWarningsBox full
758+-- | Pretty print warnings as a Box
759+prettyPrintMultipleWarningsBox :: Bool -> MultipleErrors -> Box.Box
756−prettyPrintMultipleWarnings full = renderBox . flip evalState M.empty . prettyPrintMultipleErrorsWith Warning "Warning found:" "Multiple warnings found:" full
760+prettyPrintMultipleWarningsBox full = flip evalState M.empty . prettyPrintMultipleErrorsWith Warning "Warning found:" "Multiple warnings found:" full
758-- | Pretty print errors as a Box
762-- | Pretty print errors as a Box
759prettyPrintMultipleErrorsBox :: Bool -> MultipleErrors -> Box.Box
763prettyPrintMultipleErrorsBox :: Bool -> MultipleErrors -> Box.Box