mirror of
https://github.com/AdaCore/gnatdoc.git
synced 2026-02-12 13:11:07 -08:00
Automated test.
This commit is contained in:
4
testsuite/executable/nocrash/default.gpr
Normal file
4
testsuite/executable/nocrash/default.gpr
Normal file
@@ -0,0 +1,4 @@
|
||||
|
||||
project Default is
|
||||
|
||||
end Default;
|
||||
@@ -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;
|
||||
0
testsuite/executable/nocrash/test.out
Normal file
0
testsuite/executable/nocrash/test.out
Normal file
1
testsuite/executable/nocrash/test.sh
Executable file
1
testsuite/executable/nocrash/test.sh
Executable file
@@ -0,0 +1 @@
|
||||
$GNATDOC4 default.gpr --backend=test
|
||||
2
testsuite/executable/nocrash/test.yaml
Normal file
2
testsuite/executable/nocrash/test.yaml
Normal file
@@ -0,0 +1,2 @@
|
||||
description: Test to check that GNATdoc doesn't crash on constructs
|
||||
driver: executable
|
||||
Reference in New Issue
Block a user