From 4e3b46ca2a30abf520672f4b1a28f91f171f6e7e Mon Sep 17 00:00:00 2001 From: David Monniaux Date: Sat, 16 Mar 2019 18:24:03 +0100 Subject: nor implemente --- mppa_k1c/NeedOp.v | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'mppa_k1c/NeedOp.v') diff --git a/mppa_k1c/NeedOp.v b/mppa_k1c/NeedOp.v index c5d9e58f..3442e3c1 100644 --- a/mppa_k1c/NeedOp.v +++ b/mppa_k1c/NeedOp.v @@ -51,6 +51,8 @@ Definition needs_of_operation (op: operation) (nv: nval): list nval := | Onandimm n => op1 (andimm nv n) | Oor => op2 (bitwise nv) | Oorimm n => op1 (orimm nv n) + | Onor => op2 (bitwise nv) + | Onorimm n => op1 (orimm nv n) | Oxor => op2 (bitwise nv) | Oxorimm n => op1 (bitwise nv) | Oshl | Oshr | Oshru => op2 (default nv) @@ -154,6 +156,8 @@ Proof. - apply notint_sound; apply andimm_sound; auto. - apply or_sound; auto. - apply orimm_sound; auto. +- apply notint_sound; apply or_sound; auto. +- apply notint_sound; apply orimm_sound; auto. - apply xor_sound; auto. - apply xor_sound; auto with na. - apply shlimm_sound; auto. -- cgit