Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Update deps #992

Merged
merged 4 commits into from
Jan 7, 2021
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion deps/cryptol-specs
2 changes: 1 addition & 1 deletion deps/elf-edit
2 changes: 1 addition & 1 deletion deps/llvm-pretty
2 changes: 1 addition & 1 deletion deps/saw-core
2 changes: 1 addition & 1 deletion deps/saw-core-coq
2 changes: 1 addition & 1 deletion s2nTests/docker/awslc.dockerfile
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ WORKDIR /saw-script
RUN mkdir -p /saw-script && \
git clone https://github.com/GaloisInc/aws-lc-verification.git && \
cd aws-lc-verification && \
git checkout fe647883ee5cc84309cc71d5e1e2cbce0b27be23 && \
git checkout 7f648fffe7a1f1097171279001ddab359a5749ab && \
git config --file=.gitmodules submodule.src.url https://github.com/awslabs/aws-lc && \
git submodule sync && \
git submodule update --init
Expand Down
5 changes: 1 addition & 4 deletions src/SAWScript/Crucible/JVM/Builtins.hs
Original file line number Diff line number Diff line change
Expand Up @@ -435,10 +435,7 @@ setupPrePointsTos mspec cc env pts mem0 = foldM doPointsTo mem0 pts
JVMPointsToField _loc lhs fid rhs ->
do lhs' <- resolveJVMRefVal lhs
rhs' <- resolveSetupVal cc env tyenv nameEnv rhs
-- TODO: Change type of CJ.doFieldStore to take a FieldId instead of a String.
-- Then we won't have to match the definition of 'fieldIdText' here.
let key = J.unClassName (J.fieldIdClass fid) ++ "." ++ J.fieldIdName fid
CJ.doFieldStore sym mem lhs' key (injectJVMVal sym rhs')
CJ.doFieldStore sym mem lhs' fid (injectJVMVal sym rhs')
JVMPointsToElem _loc lhs idx rhs ->
do lhs' <- resolveJVMRefVal lhs
rhs' <- resolveSetupVal cc env tyenv nameEnv rhs
Expand Down
10 changes: 2 additions & 8 deletions src/SAWScript/Crucible/JVM/Override.hs
Original file line number Diff line number Diff line change
Expand Up @@ -663,10 +663,7 @@ learnPointsTo opts sc cc spec prepost pt = do
JVMPointsToField loc ptr fid val ->
do ty <- typeOfSetupValue cc tyenv nameEnv val
rval <- resolveAllocIndexJVM ptr
-- TODO: Change type of CJ.doFieldStore to take a FieldId instead of a String.
-- Then we won't have to match the definition of 'fieldIdText' here.
let key = J.unClassName (J.fieldIdClass fid) ++ "." ++ J.fieldIdName fid
dyn <- liftIO $ CJ.doFieldLoad sym globals rval key
dyn <- liftIO $ CJ.doFieldLoad sym globals rval fid
v <- liftIO $ projectJVMVal sym ty ("field load " ++ J.fieldIdName fid ++ ", " ++ show loc) dyn
matchArg opts sc cc spec prepost v ty val

Expand Down Expand Up @@ -810,10 +807,7 @@ executePointsTo opts sc cc spec pt = do
do (_, val') <- resolveSetupValueJVM opts cc sc spec val
rval <- resolveAllocIndexJVM ptr
let dyn = injectJVMVal sym val'
-- TODO: Change type of CJ.doFieldStore to take a FieldId instead of a String.
-- Then we won't have to match the definition of 'fieldIdText' here.
let key = J.unClassName (J.fieldIdClass fid) ++ "." ++ J.fieldIdName fid
globals' <- liftIO $ CJ.doFieldStore sym globals rval key dyn
globals' <- liftIO $ CJ.doFieldStore sym globals rval fid dyn
OM (overrideGlobals .= globals')

JVMPointsToElem _loc ptr idx val ->
Expand Down