aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.8.1/contrib/filter_knr2ansi.pl
diff options
context:
space:
mode:
authorDan Albert <danalbert@google.com>2016-02-24 13:48:45 -0800
committerDan Albert <danalbert@google.com>2016-02-24 13:51:18 -0800
commitb9de1157289455b0ca26daff519d4a0ddcd1fa13 (patch)
tree4c56cc0a34b91f17033a40a455f26652304f7b8d /gcc-4.8.1/contrib/filter_knr2ansi.pl
parent098157a754787181cfa10e71325832448ddcea98 (diff)
downloadtoolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.gz
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.bz2
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.zip
Update 4.8.1 to 4.8.3.
My previous drop was the wrong version. The platform mingw is currently using 4.8.3, not 4.8.1 (not sure how I got that wrong). From ftp://ftp.gnu.org/gnu/gcc/gcc-4.8.3/gcc-4.8.3.tar.bz2. Bug: http://b/26523949 Change-Id: Id85f1bdcbbaf78c7d0b5a69e74c798a08f341c35
Diffstat (limited to 'gcc-4.8.1/contrib/filter_knr2ansi.pl')
-rwxr-xr-xgcc-4.8.1/contrib/filter_knr2ansi.pl45
1 files changed, 0 insertions, 45 deletions
diff --git a/gcc-4.8.1/contrib/filter_knr2ansi.pl b/gcc-4.8.1/contrib/filter_knr2ansi.pl
deleted file mode 100755
index 6b43e4077..000000000
--- a/gcc-4.8.1/contrib/filter_knr2ansi.pl
+++ /dev/null
@@ -1,45 +0,0 @@
-#!/usr/bin/perl
-#
-# Goes through the input line by line to find K&R style function
-# declarations, and replaces them with ANSI style declarations.
-#
-@blah = <>;
-
-for ($i = 0; $i < @blah; $i++)
-{
- if ($blah[$i] =~ /^([a-zA-Z_0-9]+)\s*\([^)]+\)\s*$/)
- {
- $name = $1;
- $funci = $i;
- $blah[$funci]="$name (";
- $i++;
- $lastline = $i;
- while ($lastline < @blah && $blah[$lastline] !~ /^{/)
- {
- $lastline++;
- }
- $lastline--;
- while ($i < @blah && $blah[$i] !~ /^{/)
- {
- $arg = $blah[$i];
- if ($i != $lastline)
- {
- $arg =~ s/;/,/g;
- }
- else
- {
- $arg =~ s/;//g;
- }
- $blah[$i] = "";
- $blah[$funci] = "$blah[$funci]" . "$arg";
- $i++;
- }
- $blah[$funci] = "$blah[$funci]" . ")\n";
- }
-}
-
-for ($i = 0; $i < @blah; $i++)
-{
- print $blah[$i];
-}
-