summaryrefslogtreecommitdiffstats
path: root/llvm/test/FrontendAda/array_range_ref.adb
diff options
context:
space:
mode:
Diffstat (limited to 'llvm/test/FrontendAda/array_range_ref.adb')
-rw-r--r--llvm/test/FrontendAda/array_range_ref.adb7
1 files changed, 7 insertions, 0 deletions
diff --git a/llvm/test/FrontendAda/array_range_ref.adb b/llvm/test/FrontendAda/array_range_ref.adb
new file mode 100644
index 00000000000..f7cba01ed81
--- /dev/null
+++ b/llvm/test/FrontendAda/array_range_ref.adb
@@ -0,0 +1,7 @@
+-- RUN: %llvmgcc -c %s -o /dev/null
+procedure Array_Range_Ref is
+ A : String (1 .. 3);
+ B : String := A (A'RANGE)(1 .. 3);
+begin
+ null;
+end;
OpenPOWER on IntegriCloud