diff options
| author | Duncan Sands <baldrick@free.fr> | 2007-03-13 15:12:35 +0000 |
|---|---|---|
| committer | Duncan Sands <baldrick@free.fr> | 2007-03-13 15:12:35 +0000 |
| commit | 56eef22a0784db7fb146dec737f3f125c68ced4d (patch) | |
| tree | 5090ac8784ed9a793fa6efed403cd95c0ac7230a /test | |
| parent | b2ec1cc6cb1c34d3e43559ab59619b29f010684b (diff) | |
| download | external_llvm-56eef22a0784db7fb146dec737f3f125c68ced4d.zip external_llvm-56eef22a0784db7fb146dec737f3f125c68ced4d.tar.gz external_llvm-56eef22a0784db7fb146dec737f3f125c68ced4d.tar.bz2 | |
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')
| -rw-r--r-- | test/AdaFrontend/array_constructor.adb | 6 | ||||
| -rw-r--r-- | test/AdaFrontend/array_size.adb | 10 |
2 files changed, 16 insertions, 0 deletions
diff --git a/test/AdaFrontend/array_constructor.adb b/test/AdaFrontend/array_constructor.adb new file mode 100644 index 0000000..d75b8e0 --- /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; diff --git a/test/AdaFrontend/array_size.adb b/test/AdaFrontend/array_size.adb new file mode 100644 index 0000000..da4c589 --- /dev/null +++ b/test/AdaFrontend/array_size.adb @@ -0,0 +1,10 @@ +-- RUN: %llvmgcc -c %s -o /dev/null +procedure Array_Size is + subtype S is String (1 .. 2); + type R is record + A : S; + end record; + X : R; +begin + null; +end; |