Raise TypeError if calling ENV.freeze

Previously, you could call ENV.freeze, but it would not have
the desired effect, as you could still modify ENV.

Fixes [Bug #15920]

1 files changed, 15 insertions, 0 deletions

diff --git a/hash.c b/hash.c
index 8af5be688e..be4fc216d4 100644
--- a/hash.c
+++ b/hash.c
@@ -5701,6 +5701,20 @@ env_reject(void)
 
 /*
  * call-seq:
+ *   ENV.freeze -> raises TypeError
+ *
+ * Ruby does not allow ENV to be frozen, so calling ENV.freeze
+ * raises TypeError.
+ */
+static VALUE
+env_freeze(VALUE self)
+{
+    rb_raise(rb_eTypeError, "cannot freeze ENV");
+    return self; /* Not reached */
+}
+
+/*
+ * call-seq:
  *   ENV.shift -> Array or nil
  *
  * Removes an environment variable name-value pair from ENV and returns it as
@@ -6058,6 +6072,7 @@ Init_Hash(void)
     rb_define_singleton_method(envtbl, "filter", env_select, 0);
     rb_define_singleton_method(envtbl, "filter!", env_select_bang, 0);
     rb_define_singleton_method(envtbl, "shift", env_shift, 0);
+    rb_define_singleton_method(envtbl, "freeze", env_freeze, 0);
     rb_define_singleton_method(envtbl, "invert", env_invert, 0);
     rb_define_singleton_method(envtbl, "replace", env_replace, 1);
     rb_define_singleton_method(envtbl, "update", env_update, 1);