| commit | e10988ddbd4af043a63dd5b41676fe76ef8c5e79 | [log] [tgz] |
|---|---|---|
| author | Chris Lattner <sabre@nondot.org> | Tue Apr 03 21:46:22 2007 +0000 |
| committer | Chris Lattner <sabre@nondot.org> | Tue Apr 03 21:46:22 2007 +0000 |
| tree | 9e780997486575f2e6a4d67cc42c2f61f33cf159 | |
| parent | e996748ea0d6b800dab75289034f4ed4dec0bdb1 [diff] [blame] |
move ada tests git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@35629 91177308-0d34-0410-b5e6-96231b3b80d8
diff --git a/test/FrontendAda/array_range_ref.adb b/test/FrontendAda/array_range_ref.adb new file mode 100644 index 0000000..f7cba01 --- /dev/null +++ b/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;