RPCS3/llvm-mirror
1
0
Fork 0
mirror of https://github.com/RPCS3/llvm-mirror.git synced 2025-02-14 09:25:25 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Test that ARRAY_RANGE_REF returns an array not an element.

Browse Source 
llvm-svn: 35209
This commit is contained in:
Duncan Sands 2007-03-20 09:50:42 +00:00
parent 0176b9859d
commit 0ea571dda0
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
test/AdaFrontend/array_range_ref.adb Normal file
View File

@ -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;