GaloisInc/macaw
1
1
Fork 0
mirror of https://github.com/GaloisInc/macaw.git synced 2024-12-02 23:43:52 +03:00
Code Issues Projects Releases Wiki Activity

Revert back to the previous order of indexing.

Browse Source 
This matches the Intel spec, and seems to match manual tests.
This commit is contained in:
Iavor Diatchki 2018-03-08 15:06:10 -08:00
parent 82e1dc0ebc
commit 07e52b16ce
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
x86_symbolic/src/Data/Macaw/X86/Crucible.hs
View File

@ -163,10 +163,11 @@ pureSem sym fn =
\xs ys ->
case testEquality (V.length xs) n2 of
Just Refl ->
do let v1 = if i `testBit` 0 then V.elemAt n1 ys
else V.elemAt n0 ys
v2 = if i `testBit` 4 then V.elemAt n1 xs
do let v1 = if i `testBit` 0 then V.elemAt n1 xs
else V.elemAt n0 xs
v2 = if i `testBit` 4 then V.elemAt n1 ys
else V.elemAt n0 ys
x1 <- evalE sym v1
x2 <- evalE sym v2
let f = fnClMul (symFuns sym)