aboutsummaryrefslogtreecommitdiff
path: root/test/AdaFrontend/array_constructor.adb
diff options
context:
space:
mode:
authorDuncan Sands <baldrick@free.fr>2007-03-13 15:12:35 +0000
committerDuncan Sands <baldrick@free.fr>2007-03-13 15:12:35 +0000
commit56eef22a0784db7fb146dec737f3f125c68ced4d (patch)
tree5090ac8784ed9a793fa6efed403cd95c0ac7230a /test/AdaFrontend/array_constructor.adb
parentb2ec1cc6cb1c34d3e43559ab59619b29f010684b (diff)
Test support for arrays with non-zero first index.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@35084 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'test/AdaFrontend/array_constructor.adb')
-rw-r--r--test/AdaFrontend/array_constructor.adb6
1 files changed, 6 insertions, 0 deletions
diff --git a/test/AdaFrontend/array_constructor.adb b/test/AdaFrontend/array_constructor.adb
new file mode 100644
index 0000000000..d75b8e0b31
--- /dev/null
+++ b/test/AdaFrontend/array_constructor.adb
@@ -0,0 +1,6 @@
+-- RUN: %llvmgcc -c %s -o /dev/null
+procedure Array_Constructor is
+ A : array (Integer range <>) of Boolean := (True, False);
+begin
+ null;
+end;