test/yaml/test_dbm.rb


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

require "test/unit"
require "yaml/dbm"

class TestYAMLDBM < Test::Unit::TestCase
  def setup
    @dbm = YAML::DBM.new("test")
  end

  def teardown
    @dbm.close
    File.unlink("test.db")
  end

  def test_fetch
    @dbm["key"] = "value"
    assert_equal "value", @dbm["key"]
    assert_equal "value", @dbm.fetch("key")
  end

  def test_delete
    @dbm["key"] = "value"
    assert_equal "value", @dbm.delete("key")
    assert_nil @dbm["key"]
  end

  def test_each_value
    @dbm["key1"] = "value1"
    @dbm["key2"] = "value2"
    @dbm.each_value do |value|
      assert_match(/value[12]/, value)
    end
  end

  def test_values
    @dbm["key1"] = "value1"
    @dbm["key2"] = "value2"
    @dbm.values.each do |value|
      assert_match(/value[12]/, value)
    end
  end

  def test_shift
    @dbm["key"] = "value"
    assert_equal ["key", "value"], @dbm.shift
  end
end if defined?(YAML::DBM)