Skip to content

Commit

Permalink
wip
Browse files Browse the repository at this point in the history
  • Loading branch information
andreistefanescu committed Dec 20, 2022
1 parent 9770e7a commit 5452f6d
Show file tree
Hide file tree
Showing 3 changed files with 17 additions and 4 deletions.
2 changes: 1 addition & 1 deletion deps/crucible
17 changes: 15 additions & 2 deletions src/SAWScript/Crucible/LLVM/Override.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1696,9 +1696,22 @@ matchPointsToValue opts sc cc spec prepost md maybe_cond ptr val =
instantiateExtMatchTerm sc cc md prepost arr_tm $ ttTerm expected_arr_tm
return Nothing

_ -> return $ Just errMsg
Nothing
| sz_nat == 0 ->
do off_type_tm <- liftIO $ scBitvector sc $ natValue ?ptrWidth
byte_width_tm <- liftIO $ scNat sc 8
byte_type_tm <- liftIO $ scBitvector sc 8

_ -> return $ Just errMsg
zero_byte_tm <- liftIO $ scBvNat sc byte_width_tm =<< scNat sc 0
zero_arr_const_tm <- liftIO $ scArrayConstant sc off_type_tm byte_type_tm zero_byte_tm

instantiateExtMatchTerm sc cc md prepost zero_arr_const_tm $ ttTerm expected_arr_tm

return Nothing

| otherwise -> return $ Just errMsg

Nothing -> return $ Just errMsg

-- | Like 'matchPointsToValue', but specifically geared towards the needs
-- of fields within bitfields. In particular, this performs all of the
Expand Down

0 comments on commit 5452f6d

Please sign in to comment.