Add missing node kind of subprogram's body.

This commit is contained in:
Vadim Godunko
2023-11-24 11:54:14 +04:00
parent 4550a46aa4
commit 8171b7aeb0

View File

@@ -2169,6 +2169,7 @@ package body GNATdoc.Frontend is
when Ada_Expr_Function
| Ada_Null_Subp_Decl
| Ada_Subp_Body
| Ada_Subp_Renaming_Decl
=>
Aux := Node.As_Base_Subp_Body.P_Decl_Part;