From 0335ac27dfc2e6ce2bd687cbd36f0425de522313 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sat, 29 Sep 2007 03:32:57 +0000
Subject: * bootstraptest/runner.rb (assert_normal_exit): new method.

* bootstraptest/test_knownbug.rb: add test for Marshal.load.


git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@13565 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 bootstraptest/runner.rb        | 26 ++++++++++++++++++++++++++
 bootstraptest/test_knownbug.rb |  4 ++++
 2 files changed, 30 insertions(+)

(limited to 'bootstraptest')

diff --git a/bootstraptest/runner.rb b/bootstraptest/runner.rb
index 12acf290d..6ee3ef3e4 100644
--- a/bootstraptest/runner.rb
+++ b/bootstraptest/runner.rb
@@ -166,6 +166,32 @@ def assert_match(expected_pattern, testsrc, message = '')
   }
 end
 
+def assert_normal_exit(testsrc, message = '')
+  newtest
+  $stderr.puts "\##{@count} #{@location}" if @verbose
+  faildesc = nil
+  filename = make_srcfile(testsrc)
+  system("#{@ruby} -W0 #{filename}")
+  if $?.signaled?
+    signo = $?.termsig
+    signame = Signal.list.invert[signo]
+    sigdesc = "signal #{signo}"
+    if signame
+      sigdesc = "SIG#{signame} (#{sigdesc})"
+    end
+    faildesc = pretty(testsrc, "killed by #{sigdesc}", nil)
+  end
+  if !faildesc
+    $stderr.print '.'
+  else
+    $stderr.print 'F'
+    error faildesc, message
+  end
+rescue Exception => err
+  $stderr.print 'E'
+  error err.message, message
+end
+
 def assert_finish(timeout_seconds, testsrc, message = '')
   newtest
   $stderr.puts "\##{@count} #{@location}" if @verbose
diff --git a/bootstraptest/test_knownbug.rb b/bootstraptest/test_knownbug.rb
index 2bfdc1194..2cff7685a 100644
--- a/bootstraptest/test_knownbug.rb
+++ b/bootstraptest/test_knownbug.rb
@@ -28,3 +28,7 @@ assert_equal 'ok', %q{
     :ok
   end
 }
+
+assert_normal_exit %q{
+  Marshal.load("\004\b\173\006\"\006k\"\006v", lambda {|v| })
+}
-- 
cgit