Add a trivial definition of the architecture-specific abstract evaluation function

This commit is contained in:
Tristan Ravitch 2017-10-04 15:46:33 -07:00
parent ab29030e14
commit f12166c2c3

View File

@ -51,11 +51,13 @@ absEvalArchFn :: proxy ppc
-> AbsValue (RegAddrWidth (ArchReg ppc)) tp -> AbsValue (RegAddrWidth (ArchReg ppc)) tp
absEvalArchFn = undefined absEvalArchFn = undefined
-- | For now, none of the architecture-specific statements have an effect on the
-- abstract value.
absEvalArchStmt :: proxy ppc absEvalArchStmt :: proxy ppc
-> AbsProcessorState (ArchReg ppc) ids -> AbsProcessorState (ArchReg ppc) ids
-> ArchStmt ppc ids -> ArchStmt ppc ids
-> AbsProcessorState (ArchReg ppc) ids -> AbsProcessorState (ArchReg ppc) ids
absEvalArchStmt = undefined absEvalArchStmt _ s _ = s
postCallAbsState :: proxy ppc postCallAbsState :: proxy ppc
-> AbsBlockState (ArchReg ppc) -> AbsBlockState (ArchReg ppc)