add a few jump target formats

This commit is contained in:
Daniel Wagner 2018-04-24 17:05:17 -04:00
parent 0565805c4f
commit 588e92cc01

View File

@ -376,6 +376,9 @@ getJumpTarget v =
case v of
F.JumpOffset _ joff -> do
(.+) <$> get rip <*> resolveJumpOffset joff
F.QWordReg r -> get (reg64Loc r)
F.Mem64 ar -> get =<< getBV64Addr ar
F.QWordImm w -> return (ValueExpr (BVValue knownNat (toInteger w)))
_ -> fail "Unexpected argument"
------------------------------------------------------------------------