From aefb46596f3f2302540a83b2be8b042232822a2f Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Tue, 9 Apr 2019 17:32:11 +0100 Subject: Add probabilities to generation of expressions --- src/VeriFuzz/Config.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/VeriFuzz/Config.hs') diff --git a/src/VeriFuzz/Config.hs b/src/VeriFuzz/Config.hs index d072e74..ec3fbc1 100644 --- a/src/VeriFuzz/Config.hs +++ b/src/VeriFuzz/Config.hs @@ -115,7 +115,7 @@ defaultConfig :: Config defaultConfig = Config (Probability defModItem defStmnt defExpr) (Property 20 Nothing 3) where defModItem = ProbModItem 5 1 defStmnt = ProbStatement 5 5 1 - defExpr = ProbExpr 1 1 1 1 1 1 1 1 1 + defExpr = ProbExpr 1 1 1 1 1 1 0 1 1 twoKey :: Toml.Piece -> Toml.Piece -> Toml.Key twoKey a b = Toml.Key (a :| [b]) -- cgit