author | haftmann |
Mon, 05 Jul 2010 15:12:20 +0200 | |
changeset 37715 | 44b27ea94a16 |
parent 33695 | bec342db1bf4 |
child 37900 | 8b3498b9eb4b |
permissions | -rw-r--r-- |
(* Title: Admin/Benchmarks/HOL-record/ROOT.ML Some benchmark on large record. *) val tests = ["RecordBenchmark"]; Unsynchronized.set timing; warning "\nset quick_and_dirty\n"; Unsynchronized.set quick_and_dirty; List.app time_use_thy tests; warning "\nreset quick_and_dirty\n"; Unsynchronized.reset quick_and_dirty; List.app time_use_thy tests;