Changeset 89265 in webkit

Timestamp:

Jun 20, 2011 11:51:12 AM (13 years ago)

Author:

abecsi@webkit.org

Message:

2011-06-20 Andras Becsi <​abecsi@webkit.org>

Reviewed by Csaba Osztrogonác.

make-hash-tools.pl: Perl 5.14 compatibility
​https://bugs.webkit.org/show_bug.cgi?id=61890

No new tests needed.

• make-hash-tools.pl: Use if/elsif instead of switch/case.

Location:

trunk/Source/WebCore

Files:

• ChangeLog (modified) (1 diff)
• make-hash-tools.pl (modified) (4 diffs)

trunk/Source/WebCore/ChangeLog

@@ +1 @@
+2011-06-20  Andras Becsi  <abecsi@webkit.org>
+
+        Reviewed by Csaba Osztrogonác.
+
+        make-hash-tools.pl: Perl 5.14 compatibility
+        https://bugs.webkit.org/show_bug.cgi?id=61890
+
+        No new tests needed.
+
+        * make-hash-tools.pl: Use if/elsif instead of switch/case.
+
 2011-06-20  Kevin Ollivier  <kevino@theolliviers.com>
 

trunk/Source/WebCore/make-hash-tools.pl

@@ -21 +21 @@
 
 use strict;
-use Switch;
 use File::Basename;
 
@@ -29 +28 @@
 
 
-switch ($option) {
-
-case "DocTypeStrings" {
+if ($option eq "DocTypeStrings") {
 
     my $docTypeStringsGenerated    = "$outdir/DocTypeStrings.cpp";
@@ -39 +36 @@
     system("gperf --key-positions=\"*\" -s 2 $docTypeStringsGperf > $docTypeStringsGenerated") == 0 || die "calling gperf failed: $?";
 
-} # case "DocTypeStrings"
-
-case "ColorData" {
+} elsif ($option eq "ColorData") {
 
     my $colorDataGenerated         = "$outdir/ColorData.cpp";
@@ -49 +44 @@
     system("gperf --key-positions=\"*\" -D -s 2 $colorDataGperf > $colorDataGenerated") == 0 || die "calling gperf failed: $?";
 
-} # case "ColorData"
-
-} # switch ($option)
+} else {
+    die "Unknown option.";
+}