From ec2f9136703a674582eb923d4613b4f832f680e6 Mon Sep 17 00:00:00 2001 From: akr Date: Thu, 15 Apr 2004 09:39:39 +0000 Subject: add a gdbm test for [ruby-dev:23381] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6161 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- test/gdbm/test_gdbm.rb | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 test/gdbm/test_gdbm.rb (limited to 'test/gdbm') diff --git a/test/gdbm/test_gdbm.rb b/test/gdbm/test_gdbm.rb new file mode 100644 index 0000000000..a4bddfe078 --- /dev/null +++ b/test/gdbm/test_gdbm.rb @@ -0,0 +1,33 @@ +require 'test/unit/testsuite' +require 'test/unit/testcase' + +begin + require 'gdbm' +rescue LoadError +end + +if defined? GDBM + require 'tmpdir' + require 'fileutils' + + class TestGDBM < Test::Unit::TestCase + TMPROOT = "#{Dir.tmpdir}/ruby-gdbm.#{$$}" + + def setup + Dir.mkdir TMPROOT + end + + def teardown + FileUtils.rm_rf TMPROOT if File.directory?(TMPROOT) + end + + def test_open + GDBM.open("#{TMPROOT}/a.dbm") {} + v = GDBM.open("#{TMPROOT}/a.dbm", nil, GDBM::READER) {|d| + assert_raises(GDBMError) { d["k"] = "v" } + true + } + assert(v) + end + end +end -- cgit v1.2.3