--- a/src/HOL/Tools/Quickcheck/narrowing_generators.ML Mon Jul 16 11:26:16 2012 +0200
+++ b/src/HOL/Tools/Quickcheck/narrowing_generators.ML Mon Jul 16 15:55:21 2012 +0200
@@ -9,7 +9,7 @@
val allow_existentials : bool Config.T
val finite_functions : bool Config.T
val overlord : bool Config.T
- val ghc_options : string Config.T
+ val ghc_options : string Config.T (* FIXME prefer settings, i.e. getenv (!?) *)
val active : bool Config.T
datatype counterexample = Universal_Counterexample of (term * counterexample)
| Existential_Counterexample of (term * counterexample) list