* test/{dbm,gdbm,sdbm}/test_{dbm,gdbm,sdbm}.rb: skip some tests

  which using fork on fork-less platforms.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@8717 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,8 @@
+Mon Jul  4 11:23:50 2005  NAKAMURA Usaku  <[email protected]>
+
+	* test/{dbm,gdbm,sdbm}/test_{dbm,gdbm,sdbm}.rb: skip some tests
+	  which using fork on fork-less platforms.
+
 Sun Jul  3 23:26:30 2005  NAKAMURA, Hiroshi  <[email protected]>
 
 	* test/wsdl/document/test_rpc.rb: compare formatted time string of
@@ -8007,7 +8012,7 @@ Tue May 18 21:21:43 2004  NAKAMURA, Hiroshi  <[email protected]>
 	  * CSV::Cell removed.  a cell is represented as just a String or
 	    nil(NULL).  this change will cause widespread destruction.
 
-      	      CSV.open("foo.csv", "r") do |row|
+	      CSV.open("foo.csv", "r") do |row|
 		row.each do |cell|
 		  if cell.is_null       # Cell#is_null
 		    p "(NULL)"

test/dbm/test_dbm.rb

@@ -61,6 +61,15 @@ def check_size(expect, dbm=@dbm)
       end
     end
 
+    def have_fork?
+      begin
+        fork{}
+        true
+      rescue NotImplementedError
+        false
+      end
+    end
+
     def test_s_new_has_no_block
       # DBM.new ignore the block
       foo = true
@@ -77,6 +86,7 @@ def test_s_open_with_block
       assert_equal(DBM.open("tmptest_dbm") { :foo }, :foo)
     end
     def test_s_open_lock
+      return unless have_fork?	# snip this test
       fork() {
         assert_instance_of(DBM, dbm = DBM.open("tmptest_dbm", 0644))
         sleep 2
@@ -115,6 +125,7 @@ def test_s_open_nolock
       if not defined? DBM::NOLOCK
         return
       end
+      return unless have_fork?	# snip this test
 
       fork() {
         assert_instance_of(DBM, dbm  = DBM.open("tmptest_dbm", 0644,

test/gdbm/test_gdbm.rb

@@ -58,6 +58,15 @@ def check_size(expect, gdbm=@gdbm)
       end
     end
 
+    def have_fork?
+      begin
+        fork{}
+        true
+      rescue NotImplementedError
+        false
+      end
+    end
+
     def test_s_new_has_no_block
       # GDBM.new ignore the block
       foo = true
@@ -108,6 +117,7 @@ def test_s_open_with_block
       assert_equal(GDBM.open("tmptest_gdbm") { :foo }, :foo)
     end
     def test_s_open_lock
+      return unless have_fork?	# snip this test
       fork() {
         assert_instance_of(GDBM, gdbm  = GDBM.open("tmptest_gdbm", 0644))
         sleep 2
@@ -146,6 +156,7 @@ def test_s_open_nolock
       if not defined? GDBM::NOLOCK
         return
       end
+      return unless have_fork?	# snip this test
 
       fork() {
         assert_instance_of(GDBM, gdbm  = GDBM.open("tmptest_gdbm", 0644,

test/sdbm/test_sdbm.rb

@@ -31,6 +31,15 @@ def check_size(expect, sdbm=@sdbm)
     end
   end
 
+    def have_fork?
+      begin
+        fork{}
+        true
+      rescue NotImplementedError
+        false
+      end
+    end
+
   def test_version
     assert(! SDBM.const_defined?(:VERSION))
   end
@@ -70,6 +79,7 @@ def test_s_open_nolock
     if not defined? SDBM::NOLOCK
       return
     end
+    return unless have_fork?	# snip this test
 
     fork() {
       assert_instance_of(SDBM, sdbm  = SDBM.open("tmptest_sdbm", 0644,