diff options
| -rw-r--r-- | libjava/ChangeLog | 5 | ||||
| -rw-r--r-- | libjava/scripts/classes.pl | 6 |
2 files changed, 10 insertions, 1 deletions
diff --git a/libjava/ChangeLog b/libjava/ChangeLog index 5af05af..7ca34d2 100644 --- a/libjava/ChangeLog +++ b/libjava/ChangeLog @@ -1,3 +1,8 @@ +2000-12-11 Tom Tromey <tromey@redhat.com> + + * scripts/classes.pl (scan): Skip lines with leading `*'. + Fix for PR libgcj/378. + 2000-12-11 Bryce McKinlay <bryce@albatross.co.nz> * configure.in: Remove check for -fuse-divide-subroutine. diff --git a/libjava/scripts/classes.pl b/libjava/scripts/classes.pl index 9523823..cc5ef78 100644 --- a/libjava/scripts/classes.pl +++ b/libjava/scripts/classes.pl @@ -68,8 +68,12 @@ sub scan local ($outer, $classname); while (<FILE>) { - # NOTE: we don't skip `/*' comments. s,//.*$,,; + # NOTE: we don't skip `/*' comments. However, we do + # skip lines with a `*' with leading whitespace. This + # catches the most important cases. + s,^\s*\*.*$,,; + # For now assume that class names start with upper # case letter. next unless /\b(class|interface) ([A-Z][A-Za-z0-9]+)/; |