Skip to content

Commit 3d914c5

Browse files
committed
Ignore component declarations inside protected
1 parent 69b99db commit 3d914c5

File tree

1 file changed

+6
-0
lines changed

1 file changed

+6
-0
lines changed

source/frontend/gnatdoc-frontend.adb

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -460,6 +460,12 @@ package body GNATdoc.Frontend is
460460

461461
return Over;
462462

463+
when Ada_Component_Decl =>
464+
-- Component declaration inside private part of the protected
465+
-- object/type declaration is ignored here.
466+
467+
return Over;
468+
463469
when others =>
464470
Ada.Text_IO.Put_Line (Image (Node) & " <<<<<");
465471

0 commit comments

Comments
 (0)