ko1	2007-09-14 16:18:23 +0900 (Fri, 14 Sep 2007)

  New Revision: 13442

  Modified files:
    trunk/ChangeLog
    trunk/bootstraptest/runner.rb

  Log:
    * bootstraptest/runner.rb: add a stress test (-s).
    


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=13442&r2=13441
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/bootstraptest/runner.rb?r1=13442&r2=13441

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 13441)
+++ ChangeLog	(revision 13442)
@@ -1,3 +1,7 @@
+Fri Sep 14 16:17:30 2007  Koichi Sasada  <ko1@a...>
+
+	* bootstraptest/runner.rb: add a stress test (-s).
+
 Fri Sep 14 16:14:28 2007  Koichi Sasada  <ko1@a...>
 
 	* vm.h, eval_intern.h: move some macros to eval_intern.h.
Index: bootstraptest/runner.rb
===================================================================
--- bootstraptest/runner.rb	(revision 13441)
+++ bootstraptest/runner.rb	(revision 13442)
@@ -59,6 +59,8 @@
     when /\A--dir=(.*)/
       dir = $1
       true
+    when /\A(--stress|-s)/
+      $stress = true
     when /\A(-q|--q(uiet))\z/
       quiet = true
       true
@@ -70,6 +72,7 @@
         --sets=NAME,NAME,...        Name of test sets.
         --dir=DIRECTORY             Working directory.
                                     default: /tmp/bootstraptest.tmpwd
+    -s, --stress                    stress test.
     -v, --verbose                   Output test name before exec.
     -q, --quiet                     Don\'t print header message.
     -h, --help                      Print this message and quit.
@@ -180,6 +183,7 @@
 def get_result_string(src)
   if @ruby
     File.open('bootstraptest.tmp.rb', 'w') {|f|
+      f.puts "GC.stress = true" if $stress
       f.puts "print(begin; #{src}; end)"
     }
     begin

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml