[llvm-commits] [hlvm] r38391 - /hlvm/trunk/test/generate/dg.exp

Reid Spencer reid at x10sys.com
Sat Jul 7 17:02:56 PDT 2007


Author: reid
Date: Sat Jul  7 19:02:56 2007
New Revision: 38391

URL: http://llvm.org/viewvc/llvm-project?rev=38391&view=rev
Log:
Update this to seed with a randomly generated number so batch of tests are not
"related".

Modified:
    hlvm/trunk/test/generate/dg.exp

Modified: hlvm/trunk/test/generate/dg.exp
URL: http://llvm.org/viewvc/llvm-project/hlvm/trunk/test/generate/dg.exp?rev=38391&r1=38390&r2=38391&view=diff

==============================================================================
--- hlvm/trunk/test/generate/dg.exp (original)
+++ hlvm/trunk/test/generate/dg.exp Sat Jul  7 19:02:56 2007
@@ -1,13 +1,17 @@
 load_lib generate.exp
 
 hlvm-generate-test 1 1 1 0
+hlvm-generate-test 1 4 3 1152485648
+hlvm-generate-test 2 2 3 1152485648
 
-set seed [ clock seconds ]
+proc random {{range 100}} {
+      return [expr {int(rand()*$range)}]
+}
 
-for { set complexity 1 } { $complexity < 5 } { incr complexity } {
-  for { set typecmplxt 1 } { $typecmplxt < 5 } { incr typecmplxt } {
-    for { set size 1 } { $size < 5 } { incr size } {
-      hlvm-generate-test $complexity $typecmplxt $size $seed
+for { set complexity 1 } { $complexity < 10 } { incr complexity } {
+  for { set typecmplxt 1 } { $typecmplxt < 6 } { incr typecmplxt } {
+    for { set size 1 } { $size < 10 } { incr size } {
+      hlvm-generate-test $complexity $typecmplxt $size [random [clock second] ]
     }
   }
 }





More information about the llvm-commits mailing list