Global constructors should be configurable and not enumerable

Source/bindings/scripts/CodeGeneratorV8.pm

 # Copyright (C) 2005, 2006 Nikolas Zimmermann <zimmermann@kde.org>
 # Copyright (C) 2006 Anders Carlsson <andersca@mac.com>
 # Copyright (C) 2006 Samuel Weinig <sam.weinig@gmail.com>
 # Copyright (C) 2006 Alexey Proskuryakov <ap@webkit.org>
 # Copyright (C) 2006 Apple Computer, Inc.
 # Copyright (C) 2007, 2008, 2009, 2012 Google Inc.
 # Copyright (C) 2009 Cameron McCormack <cam@mcc.id.au>
 # Copyright (C) Research In Motion Limited 2010. All rights reserved.
 # Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies)
 # Copyright (C) 2012 Ericsson AB. All rights reserved.
@@ skipping 2612 matching lines @@
         # use the naming convension, interface + (capitalize) attr name
         $customAccessor = $interfaceName . "::" . $attrName;
     }
 
     my $getter;
     my $setter;
     my $getterForMainWorld;
     my $setterForMainWorld;
     my $propAttr = "v8::None";
 
+    my $isConstructor = ($attribute->signature->type =~ /Constructor$/);
+
     # Check attributes.
-    if ($attrExt->{"NotEnumerable"}) {
+    # As per Web IDL specification, constructor properties on the ECMAScript global object should be
+    # configurable and should not be enumerable.
+    if ($attrExt->{"NotEnumerable"} || $isConstructor) {
         $propAttr .= " | v8::DontEnum";
     }
-    if ($attrExt->{"Unforgeable"}) {
+    if ($attrExt->{"Unforgeable"} && !$isConstructor) {
         $propAttr .= " | v8::DontDelete";
     }
 
     my $on_proto = "0 /* on instance */";
     my $data = "0 /* no data */";
 
     # Constructor
-    if ($attribute->signature->type =~ /Constructor$/) {
+    if ($isConstructor) {
         my $constructorType = $attribute->signature->type;
         $constructorType =~ s/Constructor$//;
         # $constructorType ~= /Constructor$/ indicates that it is NamedConstructor.
         # We do not generate the header file for NamedConstructor of class XXXX,
         # since we generate the NamedConstructor declaration into the header file of class XXXX.
         if ($constructorType !~ /Constructor$/ || $attribute->signature->extendedAttributes->{"CustomConstructor"}) {
             AddToImplIncludes("V8${constructorType}.h", $attribute->signature->extendedAttributes->{"Conditional"});
         }
         $data = "&V8${constructorType}::info";
         $getter = "${interfaceName}V8Internal::${interfaceName}ConstructorGetter";
@@ skipping 2222 matching lines @@
 
 sub GetPassRefPtrType
 {
     my $v8InterfaceName = shift;
 
     my $angleBracketSpace = $v8InterfaceName =~ />$/ ? " " : "";
     return "PassRefPtr<${v8InterfaceName}${angleBracketSpace}>";
 }
 
 1;