| OLD | NEW |
| 1 # Copyright (C) 2005, 2006 Nikolas Zimmermann <zimmermann@kde.org> | 1 # Copyright (C) 2005, 2006 Nikolas Zimmermann <zimmermann@kde.org> |
| 2 # Copyright (C) 2006 Anders Carlsson <andersca@mac.com> | 2 # Copyright (C) 2006 Anders Carlsson <andersca@mac.com> |
| 3 # Copyright (C) 2006 Samuel Weinig <sam.weinig@gmail.com> | 3 # Copyright (C) 2006 Samuel Weinig <sam.weinig@gmail.com> |
| 4 # Copyright (C) 2006 Alexey Proskuryakov <ap@webkit.org> | 4 # Copyright (C) 2006 Alexey Proskuryakov <ap@webkit.org> |
| 5 # Copyright (C) 2006 Apple Computer, Inc. | 5 # Copyright (C) 2006 Apple Computer, Inc. |
| 6 # Copyright (C) 2007, 2008, 2009, 2012 Google Inc. | 6 # Copyright (C) 2007, 2008, 2009, 2012 Google Inc. |
| 7 # Copyright (C) 2009 Cameron McCormack <cam@mcc.id.au> | 7 # Copyright (C) 2009 Cameron McCormack <cam@mcc.id.au> |
| 8 # Copyright (C) Research In Motion Limited 2010. All rights reserved. | 8 # Copyright (C) Research In Motion Limited 2010. All rights reserved. |
| 9 # Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies) | 9 # Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies) |
| 10 # Copyright (C) 2012 Ericsson AB. All rights reserved. | 10 # Copyright (C) 2012 Ericsson AB. All rights reserved. |
| (...skipping 2753 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 2764 $code .= " ExceptionState exceptionState(info.Holder(), info.GetIsola
te());\n"; | 2764 $code .= " ExceptionState exceptionState(info.Holder(), info.GetIsola
te());\n"; |
| 2765 } | 2765 } |
| 2766 | 2766 |
| 2767 # FIXME: Currently [Constructor(...)] does not yet support optional argument
s without [Default=...] | 2767 # FIXME: Currently [Constructor(...)] does not yet support optional argument
s without [Default=...] |
| 2768 my ($parameterCheckString, $paramIndex, %replacements) = GenerateParametersC
heck($function, $interface, ""); | 2768 my ($parameterCheckString, $paramIndex, %replacements) = GenerateParametersC
heck($function, $interface, ""); |
| 2769 $code .= $parameterCheckString; | 2769 $code .= $parameterCheckString; |
| 2770 | 2770 |
| 2771 if ($interface->extendedAttributes->{"ConstructorCallWith"}) { | 2771 if ($interface->extendedAttributes->{"ConstructorCallWith"}) { |
| 2772 if ($interface->extendedAttributes->{"ConstructorCallWith"} eq "Executio
nContext") { | 2772 if ($interface->extendedAttributes->{"ConstructorCallWith"} eq "Executio
nContext") { |
| 2773 push(@beforeArgumentList, "context"); | 2773 push(@beforeArgumentList, "context"); |
| 2774 $code .= "\n"; | 2774 $code .= " ExecutionContext* context = getExecutionContext();\n"; |
| 2775 $code .= " ExecutionContext* context = getExecutionContext();"; | |
| 2776 } elsif ($interface->extendedAttributes->{"ConstructorCallWith"} eq "Doc
ument") { | 2775 } elsif ($interface->extendedAttributes->{"ConstructorCallWith"} eq "Doc
ument") { |
| 2777 push(@beforeArgumentList, "document"); | 2776 push(@beforeArgumentList, "document"); |
| 2778 $code .= "\n"; | 2777 $code .= " Document& document = *toDocument(getExecutionContext()
);\n"; |
| 2779 $code .= " Document& document = *toDocument(getExecutionContext()
);"; | |
| 2780 } | 2778 } |
| 2781 } | 2779 } |
| 2782 | 2780 |
| 2783 if ($constructorRaisesException) { | 2781 if ($constructorRaisesException) { |
| 2784 push(@afterArgumentList, "exceptionState"); | 2782 push(@afterArgumentList, "exceptionState"); |
| 2785 } | 2783 } |
| 2786 | 2784 |
| 2787 my @argumentList; | 2785 my @argumentList; |
| 2788 my $index = 0; | 2786 my $index = 0; |
| 2789 foreach my $parameter (@{$function->parameters}) { | 2787 foreach my $parameter (@{$function->parameters}) { |
| 2790 last if $index eq $paramIndex; | 2788 last if $index eq $paramIndex; |
| 2791 if ($replacements{$parameter->name}) { | 2789 if ($replacements{$parameter->name}) { |
| 2792 push(@argumentList, $replacements{$parameter->name}); | 2790 push(@argumentList, $replacements{$parameter->name}); |
| 2793 } else { | 2791 } else { |
| 2794 push(@argumentList, $parameter->name); | 2792 push(@argumentList, $parameter->name); |
| 2795 } | 2793 } |
| 2796 $index++; | 2794 $index++; |
| 2797 } | 2795 } |
| 2798 | 2796 |
| 2799 my $argumentString = join(", ", @beforeArgumentList, @argumentList, @afterAr
gumentList); | 2797 my $argumentString = join(", ", @beforeArgumentList, @argumentList, @afterAr
gumentList); |
| 2800 $code .= "\n"; | |
| 2801 $code .= " RefPtr<${implClassName}> impl = ${implClassName}::create(${arg
umentString});\n"; | 2798 $code .= " RefPtr<${implClassName}> impl = ${implClassName}::create(${arg
umentString});\n"; |
| 2802 $code .= " v8::Handle<v8::Object> wrapper = info.Holder();\n"; | 2799 $code .= " v8::Handle<v8::Object> wrapper = info.Holder();\n"; |
| 2803 | 2800 |
| 2804 if ($constructorRaisesException) { | 2801 if ($constructorRaisesException) { |
| 2805 $code .= " if (exceptionState.throwIfNeeded())\n"; | 2802 $code .= " if (exceptionState.throwIfNeeded())\n"; |
| 2806 $code .= " return;\n"; | 2803 $code .= " return;\n"; |
| 2807 } | 2804 } |
| 2808 | 2805 |
| 2809 $code .= <<END; | 2806 $code .= <<END; |
| 2810 | 2807 |
| (...skipping 3613 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 6424 | 6421 |
| 6425 return 1 if $interface->extendedAttributes->{"CustomToV8"}; | 6422 return 1 if $interface->extendedAttributes->{"CustomToV8"}; |
| 6426 return 1 if $interface->extendedAttributes->{"CustomWrap"}; | 6423 return 1 if $interface->extendedAttributes->{"CustomWrap"}; |
| 6427 return 1 if $interface->extendedAttributes->{"SpecialWrapFor"}; | 6424 return 1 if $interface->extendedAttributes->{"SpecialWrapFor"}; |
| 6428 return 1 if InheritsInterface($interface, "Document"); | 6425 return 1 if InheritsInterface($interface, "Document"); |
| 6429 | 6426 |
| 6430 return 0; | 6427 return 0; |
| 6431 } | 6428 } |
| 6432 | 6429 |
| 6433 1; | 6430 1; |
| OLD | NEW |