diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-02-01 15:07:46 +0100 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-02-01 15:07:46 +0100 |
| commit | d2dc422b91ed628f0f8d6286a23f6f4fb9869248 (patch) | |
| tree | 41d37d0c2201ddc30dc571946408aa84d08410e6 /riscV/NeedOp.v | |
| parent | 6eabac7e12de09dc4b2a32fa2458e3b91fb34471 (diff) | |
| download | compcert-kvx-d2dc422b91ed628f0f8d6286a23f6f4fb9869248.tar.gz compcert-kvx-d2dc422b91ed628f0f8d6286a23f6f4fb9869248.zip | |
Obits_of_single etc
Diffstat (limited to 'riscV/NeedOp.v')
| -rw-r--r-- | riscV/NeedOp.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/riscV/NeedOp.v b/riscV/NeedOp.v index 117bbcb4..9a406b6f 100644 --- a/riscV/NeedOp.v +++ b/riscV/NeedOp.v @@ -87,6 +87,8 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | Ointofsingle | Ointuofsingle | Osingleofint | Osingleofintu => op1 (default nv) | Olongofsingle | Olonguofsingle | Osingleoflong | Osingleoflongu => op1 (default nv) | Ocmp c => needs_of_condition c + | Obits_of_single => op1 (default nv) + | Obits_of_float => op1 (default nv) end. Definition operation_is_redundant (op: operation) (nv: nval): bool := |