summaryrefslogtreecommitdiff
path: root/arm/Asm.v
diff options
context:
space:
mode:
Diffstat (limited to 'arm/Asm.v')
-rw-r--r--arm/Asm.v4
1 files changed, 2 insertions, 2 deletions
diff --git a/arm/Asm.v b/arm/Asm.v
index 76e8196..69f6319 100644
--- a/arm/Asm.v
+++ b/arm/Asm.v
@@ -615,11 +615,11 @@ Definition exec_instr (f: function) (i: instruction) (rs: regset) (m: mem) : out
| Pfcvtsd r1 r2 =>
Next (nextinstr (rs#r1 <- (Val.singleoffloat rs#r2))) m
| Pfldd r1 r2 n =>
- exec_load Mfloat64al32 (Val.add rs#r2 (Vint n)) r1 rs m
+ exec_load Mfloat64 (Val.add rs#r2 (Vint n)) r1 rs m
| Pflds r1 r2 n =>
exec_load Mfloat32 (Val.add rs#r2 (Vint n)) r1 rs m
| Pfstd r1 r2 n =>
- exec_store Mfloat64al32 (Val.add rs#r2 (Vint n)) r1 rs m
+ exec_store Mfloat64 (Val.add rs#r2 (Vint n)) r1 rs m
| Pfsts r1 r2 n =>
match exec_store Mfloat32 (Val.add rs#r2 (Vint n)) r1 rs m with
| Next rs' m' => Next (rs'#FR6 <- Vundef) m'