Skip to content

Commit

Permalink
Make dicuRangesBaseAddress a Bool
Browse files Browse the repository at this point in the history
While investigating how to pretty-print `DICompileUnit`'s `rangesBaseAddress`,
I discovered that `rangesBoolAddress` is meant to be printed as a `Bool`, not
as its current type of `Word64`. This commit corrects this oversight.

This is in preparation for a fix for GaloisInc#107.
  • Loading branch information
RyanGlScott committed Mar 27, 2023
1 parent d35ede8 commit 7d2b4e2
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Text/LLVM/AST.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1218,7 +1218,7 @@ data DICompileUnit' lab = DICompileUnit
, dicuSplitDebugInlining :: Bool
, dicuDebugInfoForProf :: Bool
, dicuNameTableKind :: Word64
, dicuRangesBaseAddress :: Word64
, dicuRangesBaseAddress :: Bool
, dicuSysRoot :: Maybe String
, dicuSDK :: Maybe String
} deriving (Data, Eq, Functor, Generic, Generic1, Ord, Show, Typeable)
Expand Down

0 comments on commit 7d2b4e2

Please sign in to comment.