diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/opt12_pkg.ads')
-rw-r--r-- | gcc/testsuite/gnat.dg/opt12_pkg.ads | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/opt12_pkg.ads b/gcc/testsuite/gnat.dg/opt12_pkg.ads new file mode 100644 index 000000000..4defe2b77 --- /dev/null +++ b/gcc/testsuite/gnat.dg/opt12_pkg.ads @@ -0,0 +1,11 @@ +package Opt12_Pkg is + + type Static_Integer_Subtype is range -32_000 .. 32_000; + + function Equal (L, R: Static_Integer_Subtype) return Boolean; + + type My_Fixed is delta 0.1 range -5.0 .. 5.0; + + Fix_Half : My_Fixed := 0.5; + +end Opt12_Pkg; |