diff options
author | Sylvain Boulmé <sylvain.boulme@univ-grenoble-alpes.fr> | 2020-11-18 10:04:52 +0100 |
---|---|---|
committer | Sylvain Boulmé <sylvain.boulme@univ-grenoble-alpes.fr> | 2020-11-18 10:04:52 +0100 |
commit | c3158661c6acd07df3deaa3ed2d0fc0fffb285b1 (patch) | |
tree | 8b489d0a542d40499a1da7fc3feec1ceaff2f933 /aarch64/Asm.v | |
parent | 917179f4f3889fd3c233d8c156184ab92102bf51 (diff) | |
download | compcert-kvx-c3158661c6acd07df3deaa3ed2d0fc0fffb285b1.tar.gz compcert-kvx-c3158661c6acd07df3deaa3ed2d0fc0fffb285b1.zip |
fix the semantics ?
Diffstat (limited to 'aarch64/Asm.v')
-rw-r--r-- | aarch64/Asm.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/aarch64/Asm.v b/aarch64/Asm.v index 5dafb01f..618341a3 100644 --- a/aarch64/Asm.v +++ b/aarch64/Asm.v @@ -1093,9 +1093,9 @@ Definition exec_instr (f: function) (i: instruction) (rs: regset) (m: mem) : out | Pfmov rd r1 => Next (nextinstr (rs#rd <- (rs#r1))) m | Pfmovimms rd f => - Next (nextinstr (rs#rd <- (Vsingle f))) m + Next (nextinstr ((rs#rd <- (Vsingle f))#X16 <- Vundef)) m | Pfmovimmd rd f => - Next (nextinstr (rs#rd <- (Vfloat f))) m + Next (nextinstr ((rs#rd <- (Vfloat f))#X16 <- Vundef)) m | Pfmovi S rd r1 => Next (nextinstr (rs#rd <- (float32_of_bits rs##r1))) m | Pfmovi D rd r1 => |