Automated test.

This commit is contained in:
Vadim Godunko
2024-10-03 10:26:43 +04:00
parent 92b8fc8ac6
commit 885921d27e
5 changed files with 20 additions and 0 deletions

View File

@@ -0,0 +1,4 @@
project Default is
end Default;

View File

@@ -0,0 +1,13 @@
with Ada.Finalization;
package Issue_91_Duplicate_Equality_Operator is
type Vector is tagged private;
overriding function "=" (Left : Vector; Right : Vector) return Boolean;
private
type Vector is new Ada.Finalization.Controlled with null record;
end Issue_91_Duplicate_Equality_Operator;

View File

View File

@@ -0,0 +1 @@
$GNATDOC4 default.gpr --backend=test

View File

@@ -0,0 +1,2 @@
description: Test to check that GNATdoc doesn't crash on constructs
driver: executable