From 6cdb6490437b9e609afbf5e8749b24d31c02fce1 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Thu, 6 Jul 2023 18:43:34 +0100 Subject: Add if-conversion decision procedure --- src/Compiler.v | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'src/Compiler.v') diff --git a/src/Compiler.v b/src/Compiler.v index 2fb909e..49464c0 100644 --- a/src/Compiler.v +++ b/src/Compiler.v @@ -280,10 +280,15 @@ Definition transf_hls_temp (p : Csyntax.program) : res Verilog.program := @@ print (print_GibleSeq 0) @@ total_if HLSOpts.optim_if_conversion CondElim.transf_program @@ print (print_GibleSeq 1) - @@ total_if HLSOpts.optim_if_conversion (fold_left (fun a b => IfConversion.transf_program b a) (PTree.empty _ :: PTree.empty _ :: nil)) + (* @@ total_if HLSOpts.optim_if_conversion (fold_left (fun a b => IfConversion.transf_program b a) (PTree.empty _ :: PTree.empty _ :: nil)) *) + @@ total_if HLSOpts.optim_if_conversion (IfConversion.transf_program (PTree.empty _)) @@ print (print_GibleSeq 2) - @@@ DeadBlocks.transf_program + @@ total_if HLSOpts.optim_if_conversion (IfConversion.transf_program (PTree.empty _)) @@ print (print_GibleSeq 3) + @@ total_if HLSOpts.optim_if_conversion (IfConversion.transf_program (PTree.empty _)) + @@ print (print_GibleSeq 4) + @@@ DeadBlocks.transf_program + @@ print (print_GibleSeq 5) @@@ GiblePargen.transl_program @@ print (print_GiblePar 0) @@@ HTLPargen.transl_program -- cgit