author | haftmann |
Fri, 14 Aug 2009 15:36:55 +0200 | |
changeset 32373 | c96330408d89 |
parent 32372 | b0d2b49bfaed |
child 32374 | 62617ef2c0d0 |
--- a/src/HOL/Quickcheck.thy Fri Aug 14 15:36:54 2009 +0200 +++ b/src/HOL/Quickcheck.thy Fri Aug 14 15:36:55 2009 +0200 @@ -54,7 +54,7 @@ begin definition - "random _ = Pair (STR [], \<lambda>u. Code_Eval.term_of (STR []))" + "random _ = Pair (STR '''', \<lambda>u. Code_Eval.term_of (STR ''''))" instance ..