diff options
Diffstat (limited to 'llvm')
| -rw-r--r-- | llvm/test/AdaFrontend/array_constructor.adb | 6 | ||||
| -rw-r--r-- | llvm/test/AdaFrontend/array_size.adb | 10 |
2 files changed, 16 insertions, 0 deletions
diff --git a/llvm/test/AdaFrontend/array_constructor.adb b/llvm/test/AdaFrontend/array_constructor.adb new file mode 100644 index 00000000000..d75b8e0b315 --- /dev/null +++ b/llvm/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/llvm/test/AdaFrontend/array_size.adb b/llvm/test/AdaFrontend/array_size.adb new file mode 100644 index 00000000000..da4c5891be2 --- /dev/null +++ b/llvm/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; |

