From 246553dadbf6a089bd92bcdea645cff95e26f3ed Mon Sep 17 00:00:00 2001 From: Léo Gourdin Date: Sun, 6 Dec 2020 22:15:54 +0100 Subject: Asmgen proof completely proved with ldp/stp --- aarch64/Asmblock.v | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'aarch64/Asmblock.v') diff --git a/aarch64/Asmblock.v b/aarch64/Asmblock.v index 3ad1d7f8..16f8e0c0 100644 --- a/aarch64/Asmblock.v +++ b/aarch64/Asmblock.v @@ -604,7 +604,7 @@ Definition exec_load_rd_a (chunk: memory_chunk) (transf: val -> val) Next (rs#r <- (transf v)) m. Definition exec_load_double (chunk: memory_chunk) (transf: val -> val) - (a: addressing) (rd1 rd2: preg) (rs: regset) (m: mem) := + (a: addressing) (rd1 rd2: dreg) (rs: regset) (m: mem) := if is_pair_addressing_mode_correct a then let addr := (eval_addressing a rs) in let ofs := match chunk with | Mint32 => 4 | _ => 8 end in -- cgit