Files
Ronan Desplanques 3b9a2746b6 Add support for "finally" GNAT extension
For a description of the extension, see the GNAT reference manual.

An effort has been made to minimize the impact on parsing error recovery.

Basic benchmarking was performed and showed no observable performance
impact.
2025-12-16 10:33:33 +01:00

75 lines
2.4 KiB
Plaintext

CompilationUnit foo.adb:1:1-6:9
|f_prelude:
| AdaNodeList foo.adb:1:1-1:18
| |item_0:
| | WithClause foo.adb:1:1-1:18
| | |f_has_limited:
| | | LimitedAbsent foo.adb:1:1-1:1
| | |f_has_private:
| | | PrivateAbsent foo.adb:1:1-1:1
| | |f_packages:
| | | NameList foo.adb:1:6-1:17
| | | |item_0:
| | | | DottedName foo.adb:1:6-1:17
| | | | |f_prefix:
| | | | | Id "Ada" foo.adb:1:6-1:9: Ada
| | | | |f_suffix:
| | | | | Id "Text_IO" foo.adb:1:10-1:17: Text_IO
|f_body:
| LibraryItem foo.adb:3:1-6:9
| |f_has_private:
| | PrivateAbsent foo.adb:1:18-1:18
| |f_item:
| | SubpBody ["Foo"] foo.adb:3:1-6:9
| | |f_overriding:
| | | OverridingUnspecified foo.adb:1:18-1:18
| | |f_subp_spec:
| | | SubpSpec foo.adb:3:1-3:14
| | | |f_subp_kind:
| | | | SubpKindProcedure foo.adb:3:1-3:10
| | | |f_subp_name:
| | | | DefiningName "Foo" foo.adb:3:11-3:14
| | | | |f_name:
| | | | | Id "Foo" foo.adb:3:11-3:14: Foo
| | | |f_subp_params: None
| | | |f_subp_returns: None
| | |f_aspects: None
| | |f_decls:
| | | DeclarativePart foo.adb:3:17-4:1
| | | |f_decls:
| | | | AdaNodeList foo.adb:3:17-3:17
| | |f_stmts:
| | | HandledStmts foo.adb:4:6-6:1
| | | |f_stmts:
| | | | StmtList foo.adb:5:4-5:43
| | | | |item_0:
| | | | | CallStmt foo.adb:5:4-5:43
| | | | | |f_call:
| | | | | | CallExpr foo.adb:5:4-5:42
| | | | | | |f_name:
| | | | | | | DottedName foo.adb:5:4-5:24
| | | | | | | |f_prefix:
| | | | | | | | DottedName foo.adb:5:4-5:15
| | | | | | | | |f_prefix:
| | | | | | | | | Id "Ada" foo.adb:5:4-5:7: Ada
| | | | | | | | |f_suffix:
| | | | | | | | | Id "Text_IO" foo.adb:5:8-5:15: Text_IO
| | | | | | | |f_suffix:
| | | | | | | | Id "Put_Line" foo.adb:5:16-5:24: Put_Line
| | | | | | |f_suffix:
| | | | | | | AssocList foo.adb:5:26-5:41
| | | | | | | |item_0:
| | | | | | | | ParamAssoc foo.adb:5:26-5:41
| | | | | | | | |f_designator: None
| | | | | | | | |f_r_expr:
| | | | | | | | | Str ""Hello, world!"" foo.adb:5:26-5:41: "Hello, world!"
| | | |f_exceptions:
| | | | AdaNodeList foo.adb:5:43-5:43
| | | |f_finally_part: None
| | |f_end_name:
| | | EndName foo.adb:6:5-6:8
| | | |f_name:
| | | | Id "Foo" foo.adb:6:5-6:8: Foo
|f_pragmas:
| PragmaNodeList foo.adb:6:9-6:9