aboutsummaryrefslogtreecommitdiffstats
path: root/aarch64/Asmblock.v
diff options
context:
space:
mode:
authorLéo Gourdin <leo.gourdin@univ-grenoble-alpes.fr>2020-10-13 16:02:15 +0200
committerLéo Gourdin <leo.gourdin@univ-grenoble-alpes.fr>2020-10-13 16:02:15 +0200
commit94becaa726a06ab83a7e5e61f61cab89d5884d62 (patch)
treed627edf5c38ae46ff1dc4eccca0199f07caae9c0 /aarch64/Asmblock.v
parent10ae0441711eba798e852ca580c5895cb49576d9 (diff)
downloadcompcert-kvx-94becaa726a06ab83a7e5e61f61cab89d5884d62.tar.gz
compcert-kvx-94becaa726a06ab83a7e5e61f61cab89d5884d62.zip
Simplifying Ltac and fixing a bug in AsmBlock semantics
The bug was a typo on the PArithPPP subl inst
Diffstat (limited to 'aarch64/Asmblock.v')
-rw-r--r--aarch64/Asmblock.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/aarch64/Asmblock.v b/aarch64/Asmblock.v
index 8f859d55..950e28e9 100644
--- a/aarch64/Asmblock.v
+++ b/aarch64/Asmblock.v
@@ -1255,7 +1255,7 @@ Definition arith_eval_ppp i v1 v2 :=
| Pudiv W => Val.maketotal (Val.divu v1 v2)
| Pudiv X => Val.maketotal (Val.divlu v1 v2)
| Paddext x => Val.addl v1 (eval_extend v2 x)
- | Psubext x => Val.subl v2 (eval_extend v2 x)
+ | Psubext x => Val.subl v1 (eval_extend v2 x)
| Pfadd S => Val.addfs v1 v2
| Pfadd D => Val.addf v1 v2
| Pfdiv S => Val.divfs v1 v2