diff options
| author | tromey <tromey@138bc75d-0d04-0410-961f-82ee72b054a4> | 2000-12-11 21:50:39 +0000 |
|---|---|---|
| committer | tromey <tromey@138bc75d-0d04-0410-961f-82ee72b054a4> | 2000-12-11 21:50:39 +0000 |
| commit | bbf36dc1413e408a21754e8e22314248548ce0a2 (patch) | |
| tree | 6fb1aaee32c75d01c23a3af309e9333845c4d4c9 /libjava/scripts/classes.pl | |
| parent | b72dabdfb5b27169d201361393c6b66088fd4435 (diff) | |
| download | gcc-bbf36dc1413e408a21754e8e22314248548ce0a2.tar.gz | |
* scripts/classes.pl (scan): Skip lines with leading `*'.
Fix for PR libgcj/378.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@38198 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libjava/scripts/classes.pl')
| -rw-r--r-- | libjava/scripts/classes.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/libjava/scripts/classes.pl b/libjava/scripts/classes.pl index 9523823a313..cc5ef786668 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]+)/; |