GaloisInc/macaw
1
1
Fork 0
mirror of https://github.com/GaloisInc/macaw.git synced 2024-11-28 01:35:33 +03:00
Code Issues Projects Releases Wiki Activity

Add typeclass constraints to ppErrors.

Browse Source
This commit is contained in:
Joe Hendrix 2017-07-20 11:02:40 -07:00
parent 6dc1907669
commit 5008f6f752
No known key found for this signature in database
GPG Key ID: 8DFA5FF784098C4F
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Data/Macaw/Memory/ElfLoader.hs
View File

@ -428,7 +428,8 @@ memoryForElf opt e =
LoadBySegment -> memoryForElfSegments opt e
-- | Pretty print parser errors to stderr.
ppErrors :: FilePath -> [ElfParseError w] -> IO ()
ppErrors :: (Eq (ElfWordType w), Num (ElfWordType w), Show (ElfWordType w))
=> FilePath -> [ElfParseError w] -> IO ()
ppErrors path errl = do
when (not (null errl)) $ do
hPutStrLn stderr $ "Non-fatal errors during parsing " ++ path