summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/equal1.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gnat.dg/equal1.ads')
-rw-r--r--gcc/testsuite/gnat.dg/equal1.ads8
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/equal1.ads b/gcc/testsuite/gnat.dg/equal1.ads
new file mode 100644
index 000000000..0b6ed7261
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/equal1.ads
@@ -0,0 +1,8 @@
+package equal1 is
+ type Basic_Connection_Status_T is (Connected, Temporary_Disconnected,
+ Disconnected);
+ for Basic_Connection_Status_T'Size use 8;
+ type Application_Connection_Status_T is (Connected, Disconnected);
+ for Application_Connection_Status_T'Size use 8;
+end equal1;
+