diff options
| author | Sylvain Boulmé <sylvain.boulme@univ-grenoble-alpes.fr> | 2018-09-19 12:09:36 +0200 |
|---|---|---|
| committer | Sylvain Boulmé <sylvain.boulme@univ-grenoble-alpes.fr> | 2018-09-19 12:09:36 +0200 |
| commit | 191305d4cfc1416dd50080c93a7c3e16768934b4 (patch) | |
| tree | 7ce769af069de2aadd34e1f9b1fc44e1dbb1d7a8 /mppa_k1c/Asmblockgenproof0.v | |
| parent | c673b6a5f66c931819fbcee8b7abcc974b0418f8 (diff) | |
| download | compcert-kvx-191305d4cfc1416dd50080c93a7c3e16768934b4.tar.gz compcert-kvx-191305d4cfc1416dd50080c93a7c3e16768934b4.zip | |
proof sketch for Asmgenproof.return_address_exists ?
Diffstat (limited to 'mppa_k1c/Asmblockgenproof0.v')
| -rw-r--r-- | mppa_k1c/Asmblockgenproof0.v | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/mppa_k1c/Asmblockgenproof0.v b/mppa_k1c/Asmblockgenproof0.v index 374ae0d1..b1c71f42 100644 --- a/mppa_k1c/Asmblockgenproof0.v +++ b/mppa_k1c/Asmblockgenproof0.v @@ -93,3 +93,7 @@ Definition return_address_offset (f: MB.function) (c: MB.code) (ofs: ptrofs) : P transf_function f = OK tf -> transl_blocks f c = OK tc -> code_tail (Ptrofs.unsigned ofs) (fn_blocks tf) tc. + +Axiom return_address_exists: + forall b f sg ros c, b.(MB.exit) = Some (MBcall sg ros) -> is_tail (b :: c) f.(MB.fn_code) -> + exists ra, return_address_offset f c ra.
\ No newline at end of file |