From 34530b1ad317cb522233c72cb4dc0895a0f9cf6f Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 14 Sep 2007 07:18:23 +0000
Subject: * bootstraptest/runner.rb: add a stress test (-s).

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@13442 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 bootstraptest/runner.rb | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'bootstraptest/runner.rb')

diff --git a/bootstraptest/runner.rb b/bootstraptest/runner.rb
index 8a2597bcb2..502eb64857 100644
--- a/bootstraptest/runner.rb
+++ b/bootstraptest/runner.rb
@@ -59,6 +59,8 @@ def main
     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 @@ Usage: #{File.basename($0, '.*')} --ruby=PATH [--sets=NAME,NAME,...]
         --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 @@ end
 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
-- 
cgit v1.2.3