# HG changeset patch
# User bulwahn
# Date 1322641264 -3600
# Node ID 06acd5cbb53b122450a010e0b00ea242c1bc5940
# Parent  ac1651b08da218d24e2fefbfbc71d78efc5fe541
adding parsing of potential configuration to quickcheck command

diff -r ac1651b08da2 -r 06acd5cbb53b src/Tools/quickcheck.ML
--- a/src/Tools/quickcheck.ML	Wed Nov 30 09:21:02 2011 +0100
+++ b/src/Tools/quickcheck.ML	Wed Nov 30 09:21:04 2011 +0100
@@ -410,6 +410,7 @@
   | parse_test_param ("no_assms", [arg]) = apsnd (Config.put_generic no_assms (read_bool arg))
   | parse_test_param ("expect", [arg]) = apsnd (map_test_params ((apsnd o K) (read_expectation arg)))
   | parse_test_param ("report", [arg]) = apsnd (Config.put_generic report (read_bool arg))
+  | parse_test_param ("potential", [arg]) = apsnd (Config.put_generic potential (read_bool arg))
   | parse_test_param ("quiet", [arg]) = apsnd (Config.put_generic quiet (read_bool arg))
   | parse_test_param ("timeout", [arg]) = apsnd (Config.put_generic timeout (read_real arg))
   | parse_test_param ("finite_types", [arg]) = apsnd (Config.put_generic finite_types (read_bool arg))