mirror of
https://github.com/GaloisInc/macaw.git
synced 2024-11-23 08:27:24 +03:00
arm: Update the tests to work with the latest macaw
This commit is contained in:
parent
7e129f1ce1
commit
1f10c1d36b
@ -59,11 +59,10 @@ withMemory :: forall w m a
|
||||
withMemory _ e k =
|
||||
let options = MM.LoadOptions { MM.loadRegionIndex = Just 0
|
||||
, MM.loadRegionBaseOffset = 0
|
||||
, MM.loadStyleOverride = Just MM.LoadBySegment
|
||||
, MM.includeBSS = False}
|
||||
}
|
||||
in case MM.memoryForElf options e of
|
||||
Left err -> C.throwM (MemoryLoadError err)
|
||||
Right (_sim, mem) -> k mem
|
||||
Right (_sim, mem, _) -> k mem
|
||||
|
||||
|
||||
data ElfException = MemoryLoadError String
|
||||
|
Loading…
Reference in New Issue
Block a user