doc/check-docs (scansyms): Stop trying to parse at `Leaked slot names'.

diff --git a/doc/check-docs b/doc/check-docs
index fbeb367c16547f88b6eab0576b8f90212e4b52b1..c721da27597e17d3beef70d1bc9aeaa63b0001f2 100755 (executable)
--- a/doc/check-docs
+++ b/doc/check-docs
@@ -14,7 +14,7 @@ sub scansyms (\%$) {
     chomp;
     if (/^---/) { $st = NEWPKG; }
     elsif ($st eq NEWPKG && /^Package `[-\w]+'/) { $st = LIST; }
     chomp;
     if (/^---/) { $st = NEWPKG; }
     elsif ($st eq NEWPKG && /^Package `[-\w]+'/) { $st = LIST; }

-    elsif ($st eq LIST && /^Classes:/) { $st = LIMBO; }
+    elsif ($st eq LIST && /^(Classes|Leaked slot names):/) { $st = LIMBO; }

     elsif ($st eq LIMBO && /^Methods:/) { $st = METHODS; }
     elsif (/^\s*$/) { }
     elsif ($st eq LIMBO) { }
     elsif ($st eq LIMBO && /^Methods:/) { $st = METHODS; }
     elsif (/^\s*$/) { }
     elsif ($st eq LIMBO) { }