author | haftmann |
Thu, 06 May 2010 17:59:19 +0200 | |
changeset 36714 | ae84ddf03c58 |
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;