summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/modular3_pkg.ads
blob: 85cf6a8bfaaf3dc3b1cf602337fdd808f2e2605e (plain)
1
2
3
4
5
6
7
8
9
10
11
package Modular3_Pkg is

   type Int16_T is range -32768 .. 32767;
   for Int16_T'Size use 16;
   for Int16_T'Alignment use 1;

   type Mod16_T is mod 2 ** 16;
   for Mod16_T'Size use 16;
   for Mod16_T'Alignment use 1;

end Modular3_Pkg;