Mercurial > hg > release > icedtea7-2.5
view javac.in @ 2807:f85e5a8108d2 default tip
Replace temporary OpenJDK 7 bug IDs with allocated ones from the OpenJDK bug database.
2015-08-21 Andrew John Hughes <gnu.andrew@member.fsf.org>
* NEWS: Replace temporary OpenJDK 7
bug IDs with allocated ones from the
OpenJDK bug database.
author | Andrew John Hughes <gnu_andrew@member.fsf.org> |
---|---|
date | Fri, 21 Aug 2015 18:39:22 +0100 |
parents | c8821d8403ff |
children |
line wrap: on
line source
#!/usr/bin/perl -w use strict; use constant NO_DUP_ARGS => qw(-source -target -d -encoding); use constant STRIP_ARGS_1 => qw(-Werror -implicit:none); use constant STRIP_ARGS_2 => qw(-Xmaxwarns); my ($ECJ_WARNINGS, $JAVAC_WARNINGS); if ("@ENABLE_WARNINGS@" eq "yes") { $ECJ_WARNINGS="-warn:-deprecation,serial,unused,warningToken"; $JAVAC_WARNINGS="-Xlint:unchecked,cast,divzero,empty,finally,overrides"; } else { $ECJ_WARNINGS="-nowarn"; $JAVAC_WARNINGS="-nowarn"; } my @bcoption; my @bcoptions = grep {$_ =~ '^-Xbootclasspath/p:' } @ARGV; my $bc = $bcoptions[0]; my $systembc = glob '@abs_top_builddir@/bootstrap/jdk1.6.0/jre/lib/rt.jar'; if ($bc) { $bc =~ s/^[^:]*://; $systembc = join ":", $bc, $systembc; } push @bcoption, '-bootclasspath', $systembc unless grep {$_ eq '-bootclasspath'} @ARGV; my @ecj_parms = ($ECJ_WARNINGS, @bcoption); my @javac_parms = ($JAVAC_WARNINGS, '-Xprefer:source', '-XDignore.symbol.file=true', '-J-Xmx1024m'); # Work around ecj's inability to handle duplicate command-line # options and unknown javac options. sub gen_ecj_opts { my @new_args = @{$_[0]}; for my $opt (NO_DUP_ARGS) { my @indices = reverse grep {$new_args[$_] eq $opt} 0..$#new_args; if (@indices > 1) { shift @indices; # keep last instance only splice @new_args, $_, 2 for @indices; } } for my $opt (STRIP_ARGS_1) { my @indices = reverse grep {$new_args[$_] eq $opt} 0..$#new_args; splice @new_args, $_, 1 for @indices; } for my $opt (STRIP_ARGS_2) { my @indices = reverse grep {$new_args[$_] eq $opt} 0..$#new_args; splice @new_args, $_, 2 for @indices; } return @new_args; } if ( -e "@abs_top_builddir@/native-ecj" ) { my @ecj_args = gen_ecj_opts( \@ARGV ); exec '@abs_top_builddir@/native-ecj', @ecj_parms, @ecj_args ; } elsif ( -e "@JAVAC@" ) { if ("@USING_ECJ@" eq "yes") { my @ecj_args = gen_ecj_opts( \@ARGV ); exec '@JAVAC@', @ecj_parms, @ecj_args ; } else { exec '@JAVAC@', @javac_parms, @ARGV ; } } else { my @ecj_args = gen_ecj_opts( \@ARGV ); my @CLASSPATH = ('@ECJ_JAR@'); push @CLASSPATH, split /:/, $ENV{"CLASSPATH"} if exists $ENV{"CLASSPATH"}; $ENV{"CLASSPATH"} = join ':', @CLASSPATH; exec '@JAVA@', 'org.eclipse.jdt.internal.compiler.batch.Main', @ecj_parms, @ecj_args; }