src/HOL/Tools/Quickcheck/exhaustive_generators.ML
changeset 45159 3f1d1ce024cb
parent 44241 7943b69f0188
child 45420 d17556b9a89b
equal deleted inserted replaced
45157:efc2e2d80218 45159:3f1d1ce024cb
   486     Code_Runtime.dynamic_value_strict
   486     Code_Runtime.dynamic_value_strict
   487       (Validator_Batch.get, put_validator_batch, "Exhaustive_Generators.put_validator_batch")
   487       (Validator_Batch.get, put_validator_batch, "Exhaustive_Generators.put_validator_batch")
   488       thy (SOME target) (K I) (HOLogic.mk_list @{typ "code_numeral => bool"} ts') []
   488       thy (SOME target) (K I) (HOLogic.mk_list @{typ "code_numeral => bool"} ts') []
   489   end;
   489   end;
   490 
   490 
   491 val test_goals = Quickcheck.generator_test_goal_terms compile_generator_expr;
   491 val test_goals = Quickcheck_Common.generator_test_goal_terms compile_generator_expr;
   492   
   492   
   493 (* setup *)
   493 (* setup *)
   494 
   494 
   495 val active = Attrib.setup_config_bool @{binding quickcheck_exhaustive_active} (K true);
   495 val active = Attrib.setup_config_bool @{binding quickcheck_exhaustive_active} (K true);
   496 
   496