diff options
| author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-05-19 09:54:40 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-05-19 09:54:40 +0000 |
| commit | be4d6e42dfa287b93b1a35ec820ab2a5aaf8c7ec (patch) | |
| tree | c51b66e9154bc64cf4fd4191251f29d102928841 /backend/Mach.v | |
| parent | 60e1fd71c7e97b2214daf574e0f41b55a3e0bceb (diff) | |
| download | compcert-kvx-be4d6e42dfa287b93b1a35ec820ab2a5aaf8c7ec.tar.gz compcert-kvx-be4d6e42dfa287b93b1a35ec820ab2a5aaf8c7ec.zip | |
Merge of the float32 branch:
- added RTL type "Tsingle"
- ABI-compatible passing of single-precision floats on ARM and x86
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2260 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/Mach.v')
| -rw-r--r-- | backend/Mach.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/Mach.v b/backend/Mach.v index ec48195c..316e7887 100644 --- a/backend/Mach.v +++ b/backend/Mach.v @@ -296,7 +296,7 @@ Inductive step: state -> trace -> state -> Prop := | exec_Msetstack: forall s f sp src ofs ty c rs m m' rs', store_stack m sp ty ofs (rs src) = Some m' -> - rs' = undef_regs (destroyed_by_op Omove) rs -> + rs' = undef_regs (destroyed_by_setstack ty) rs -> step (State s f sp (Msetstack src ofs ty :: c) rs m) E0 (State s f sp c rs' m') | exec_Mgetparam: |