From 2674181a88e4eea11e11fca676c257886b3805dd Mon Sep 17 00:00:00 2001 From: Jason Gross Date: Mon, 15 May 2017 18:09:44 -0400 Subject: Allow 'bool' in output --- src/Compilers/Z/Bounds/Pipeline.v | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/Compilers/Z/Bounds/Pipeline.v b/src/Compilers/Z/Bounds/Pipeline.v index 9259aedd8..fd61fefb4 100644 --- a/src/Compilers/Z/Bounds/Pipeline.v +++ b/src/Compilers/Z/Bounds/Pipeline.v @@ -19,9 +19,9 @@ Ltac refine_reflectively_gen allowable_bit_widths opts := refine_to_reflective_glue allowable_bit_widths; do_reflective_pipeline opts. -Ltac refine_reflectively128_with opts := refine_reflectively_gen (128::256::nil)%nat%list opts. -Ltac refine_reflectively64_with opts := refine_reflectively_gen (64::128::nil)%nat%list opts. -Ltac refine_reflectively32_with opts := refine_reflectively_gen (32::64::nil)%nat%list opts. +Ltac refine_reflectively128_with opts := refine_reflectively_gen (1::128::256::nil)%nat%list opts. +Ltac refine_reflectively64_with opts := refine_reflectively_gen (1::64::128::nil)%nat%list opts. +Ltac refine_reflectively32_with opts := refine_reflectively_gen (1::32::64::nil)%nat%list opts. Ltac refine_reflectively128 := refine_reflectively128_with default_PipelineOptions. Ltac refine_reflectively64 := refine_reflectively64_with default_PipelineOptions. Ltac refine_reflectively32 := refine_reflectively32_with default_PipelineOptions. -- cgit v1.2.3