diff options
| author | Brian Jones <cbj@gnu.org> | 1999-11-26 04:53:56 +0000 |
|---|---|---|
| committer | Brian Jones <cbj@gnu.org> | 1999-11-26 04:53:56 +0000 |
| commit | d7d66645d956d78c63ad16f624349c6ea5c0f482 (patch) | |
| tree | e51720a46169c831dcfb32a38a6a56469b76ed7e /lib | |
| parent | bee163731266ba46dac46968927875b989a9a539 (diff) | |
| download | classpath-d7d66645d956d78c63ad16f624349c6ea5c0f482.tar.gz | |
# fixed it so mkdep can detect more native methods
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/mkdep.pl.in | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lib/mkdep.pl.in b/lib/mkdep.pl.in index 16f50b4f3..860f00302 100755 --- a/lib/mkdep.pl.in +++ b/lib/mkdep.pl.in @@ -262,14 +262,21 @@ sub findNativeFiles sub hasNativeMethod { my ($file) = @_; - my ($line) = ""; + my ($line, $one, $two) = ""; open(FILE, "<$file") || die "Could not open file ", $file, "\n"; while(<FILE>) { - $line = $_; + chop; + $one = $two; + $two = $_; + + $line = $one . " " . $two; if ( ($line =~ /^\s*public\s.*native\s+\S+\s+\S+\s*\(/) || + ($line =~ /^\s*public\s.*native\s+\S+\s+\S+\s+\S+\s*\(/) || ($line =~ /^\s*protected\s.*native\s+\S+\s+\S+\s*\(/) || + ($line =~ /^\s*protected\s.*native\s+\S+\s+\S+\s+\S+\s*\(/) || ($line =~ /^\s*private\s.*native\s+\S+\s+\S+\s*\(/) || + ($line =~ /^\s*private\s.*native\s+\S+\s+\S+\s+\S+\s*\(/) || ($line =~ /^\s*abstract\s.*native\s+\S+\s+\S+\s*\(/) || ($line =~ /^\s*final\s.*native\s+\S+\s+\S+\s*\(/) || ($line =~ /^\s*synchronized\s.*native\s+\S+\s+\S+\s*\(/) || |