From 3f6f15b6f59df5aa78df6e77cdf970af7eb25302 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Wed, 22 Sep 2021 19:54:11 +0100 Subject: RTLpargen passes compilation again --- src/hls/RTLBlockInstr.v | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/hls/RTLBlockInstr.v') diff --git a/src/hls/RTLBlockInstr.v b/src/hls/RTLBlockInstr.v index 8cd3468..8d3fde4 100644 --- a/src/hls/RTLBlockInstr.v +++ b/src/hls/RTLBlockInstr.v @@ -232,7 +232,7 @@ Fixpoint trans_pred (bound: nat) (p: pred_op) : - apply orb_true_intro. apply satFormula_mult2 in H. inv H. apply i in H0. auto. apply i0 in H0. auto. -Qed. +Defined. Definition sat_pred (bound: nat) (p: pred_op) : option ({al : alist | sat_predicate p (interp_alist al) = true} @@ -251,7 +251,7 @@ Definition sat_pred (bound: nat) (p: pred_op) : - intros. specialize (n a). specialize (i a). destruct (sat_predicate p a). exfalso. apply n. apply i. auto. auto. -Qed. +Defined. Definition sat_pred_simple (bound: nat) (p: pred_op) := match sat_pred bound p with -- cgit