diff options
author | Yann Herklotz <git@yannherklotz.com> | 2020-06-12 14:40:15 +0100 |
---|---|---|
committer | Yann Herklotz <git@yannherklotz.com> | 2020-06-12 14:40:15 +0100 |
commit | 86f42b92d87020875e2a7ef4ba40de12d261685f (patch) | |
tree | b7cd817007fbf5f17f17fc0e578c99cddfaede45 /src/translation/HTLgen.v | |
parent | da1b679c68c06ce1cf59df7706dcc59036872269 (diff) | |
download | vericert-kvx-86f42b92d87020875e2a7ef4ba40de12d261685f.tar.gz vericert-kvx-86f42b92d87020875e2a7ef4ba40de12d261685f.zip |
Add declaration of loads
Diffstat (limited to 'src/translation/HTLgen.v')
-rw-r--r-- | src/translation/HTLgen.v | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/translation/HTLgen.v b/src/translation/HTLgen.v index bbce47c..a891d6c 100644 --- a/src/translation/HTLgen.v +++ b/src/translation/HTLgen.v @@ -363,6 +363,7 @@ Definition transf_instr (fin rtrn stack: reg) (ni: node * instruction) : mon uni add_instr n n' (nonblock dst instr) | Iload mem addr args dst n' => do src <- translate_arr_access mem addr args stack; + do _ <- declare_reg None dst 32; add_instr n n' (block dst src) | Istore mem addr args src n' => do dst <- translate_arr_access mem addr args stack; |