diff --git a/macaw-ppc/src/Data/Macaw/PPC/Generator.hs b/macaw-ppc/src/Data/Macaw/PPC/Generator.hs index 23c0ac3a..8033b93d 100644 --- a/macaw-ppc/src/Data/Macaw/PPC/Generator.hs +++ b/macaw-ppc/src/Data/Macaw/PPC/Generator.hs @@ -66,7 +66,7 @@ frontierBlocks = lens _frontierBlocks (\s v -> s { _frontierBlocks = v }) -- PreBlock data PreBlock ppc ids = PreBlock { pBlockIndex :: !Word64 - , pBlockAddr :: !(MM.MemSegmentOff 64) + , pBlockAddr :: !(MM.MemSegmentOff (ArchAddrWidth ppc)) -- ^ Starting address of function in preblock. , _pBlockStmts :: !(Seq.Seq (Stmt ppc ids)) , _pBlockState :: !(RegState (PPCReg ppc) (Value ppc ids))