diff options
author | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-03-06 12:36:11 +0100 |
---|---|---|
committer | Léo Gourdin <leo.gourdin@univ-grenoble-alpes.fr> | 2021-03-06 12:36:11 +0100 |
commit | c19ecc9326d0278989d7651bf8c8cf0d1c387235 (patch) | |
tree | 479bd06ca0ed2e2d14900a78c93914537e4a7d91 /riscV/NeedOp.v | |
parent | 3e953ef41f736ed5b7db699b1adf21d46cb5b8db (diff) | |
download | compcert-kvx-c19ecc9326d0278989d7651bf8c8cf0d1c387235.tar.gz compcert-kvx-c19ecc9326d0278989d7651bf8c8cf0d1c387235.zip |
Adding a mini CSE pass in the expansion oracle
Diffstat (limited to 'riscV/NeedOp.v')
-rw-r--r-- | riscV/NeedOp.v | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/riscV/NeedOp.v b/riscV/NeedOp.v index 4b309f5b..46d6ee73 100644 --- a/riscV/NeedOp.v +++ b/riscV/NeedOp.v @@ -96,8 +96,8 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | OEsltiw _ => op1 (default nv) | OEsltiuw _ => op1 (default nv) | OExoriw _ => op1 (bitwise nv) - | OEluiw _ _ => op1 (default nv) - | OEaddiwr0 _ _ => op1 (default nv) (* TODO gourdinl modarith impossible? *) + | OEluiw _ => op1 (default nv) + | OEaddiwr0 _ => op1 (default nv) (* TODO gourdinl modarith impossible? *) | OEseql _ => op2 (default nv) | OEsnel _ => op2 (default nv) | OEsequl _ => op2 (default nv) @@ -110,6 +110,7 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | OEluil _ => op1 (default nv) | OEaddilr0 _ => op1 (default nv) (* TODO gourdinl modarith impossible? *) | OEloadli _ => op1 (default nv) + | OEmayundef _ => op2 (default nv) | OEfeqd => op2 (default nv) | OEfltd => op2 (default nv) | OEfled => op2 (default nv) |