ada/gnatdoc
0
0
Fork 0
mirror of https://github.com/AdaCore/gnatdoc.git synced 2026-02-12 13:11:07 -08:00
Code Issues Packages Projects Releases Wiki Activity

Avoid CONSTRAINT_ERROR

Browse Source 
Fixes #99
This commit is contained in:
Maxim Reznik
2024-11-12 13:34:16 +02:00
parent 3b9ae04ea8
commit c062d877c4
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/gnatdoc-comments-extractor.adb
View File

@@ -2528,8 +2528,8 @@ package body GNATdoc.Comments.Extractor is
Raw_Section := Trailing_Section;
elsif Options.Fallback
and Leading_Section /= null
and not Leading_Section.Text.Is_Empty
and then Leading_Section /= null
and then not Leading_Section.Text.Is_Empty
then
Raw_Section := Leading_Section;
end if;