diff options
Diffstat (limited to 'test/FrontendAda/array_range_ref.adb')
| -rw-r--r-- | test/FrontendAda/array_range_ref.adb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/FrontendAda/array_range_ref.adb b/test/FrontendAda/array_range_ref.adb new file mode 100644 index 000000000000..ae9bdc6cfcdf --- /dev/null +++ b/test/FrontendAda/array_range_ref.adb @@ -0,0 +1,7 @@ +-- RUN: %llvmgcc -c %s +procedure Array_Range_Ref is + A : String (1 .. 3); + B : String := A (A'RANGE)(1 .. 3); +begin + null; +end; |