Add support for [NoInterfaceObject] extended attribute to bindings generator

Source/bindings/scripts/IDLParser.pm

 # 
 # KDOM IDL parser
 #
 # Copyright (C) 2005 Nikolas Zimmermann <wildfox@kde.org>
 # 
 # This library is free software; you can redistribute it and/or
 # modify it under the terms of the GNU Library General Public
 # License as published by the Free Software Foundation; either
 # version 2 of the License, or (at your option) any later version.
 # 
@@ skipping 152 matching lines @@
     my $name = shift;
     my $line = shift;
     my $typedef = $typedefs{$name};
     my $msg = "Unexpected extendedAttributeList in typedef \"$name\" at " . $self->{Line};
     if (defined ($line)) {
         $msg .= " IDLParser.pm:" . $line;
     }
     die $msg if %{$typedef->extendedAttributes};
 }
 
+sub ParseOnlyExtendedAttributes
+{
+    my $self = shift;
+    my $fileName = shift;
+    my $defines = shift;
+    my $preprocessor = shift;
+
+    my @lines = applyPreprocessor($fileName, $defines, $preprocessor);
+    $self->{Line} = $lines[0];
+    $self->{DocumentContent} = join(' ', @lines);
+
+    $self->getToken();
+    return $self->parseExtendedAttributeListAllowEmpty();
+}
+
 sub Parse
 {
     my $self = shift;
     my $fileName = shift;
     my $defines = shift;
     my $preprocessor = shift;
 
     my @definitions = ();
 
     my @lines = applyPreprocessor($fileName, $defines, $preprocessor);
@@ skipping 2020 matching lines @@
             $customConstructor->{overloadedIndex} = $index++;
             push(@{$interface->customConstructors}, $customConstructor);
         }
         delete $extendedAttributeList->{"CustomConstructors"};
         $extendedAttributeList->{"CustomConstructor"} = "VALUE_IS_MISSING";
     }
     $interface->extendedAttributes($extendedAttributeList);
 }
 
 1;