From d92f10ac061b38952747aff06225019e7a6d37de Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 7 May 2004 09:39:12 +0000
Subject: add freeze test for dbm and gdbm.

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

(limited to 'test/gdbm')

diff --git a/test/gdbm/test_gdbm.rb b/test/gdbm/test_gdbm.rb
index a4bddfe078..ca0110cd91 100644
--- a/test/gdbm/test_gdbm.rb
+++ b/test/gdbm/test_gdbm.rb
@@ -29,5 +29,12 @@ if defined? GDBM
       }
       assert(v)
     end
+
+    def test_freeze
+      GDBM.open("#{TMPROOT}/a.dbm") {|d|
+        d.freeze
+        assert_raises(TypeError) { d["k"] = "v" }
+      }
+    end
   end
 end
-- 
cgit v1.2.3