diff options
| author | Shih-wei Liao <sliao@google.com> | 2010-02-10 11:10:31 -0800 |
|---|---|---|
| committer | Shih-wei Liao <sliao@google.com> | 2010-02-10 11:10:31 -0800 |
| commit | e264f62ca09a8f65c87a46d562a4d0f9ec5d457e (patch) | |
| tree | 59e3d57ef656cef79afa708ae0a3daf25cd91fcf /test/FrontendAda/array_ref.adb | |
| download | external_llvm-e264f62ca09a8f65c87a46d562a4d0f9ec5d457e.zip external_llvm-e264f62ca09a8f65c87a46d562a4d0f9ec5d457e.tar.gz external_llvm-e264f62ca09a8f65c87a46d562a4d0f9ec5d457e.tar.bz2 | |
Check in LLVM r95781.
Diffstat (limited to 'test/FrontendAda/array_ref.adb')
| -rw-r--r-- | test/FrontendAda/array_ref.adb | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test/FrontendAda/array_ref.adb b/test/FrontendAda/array_ref.adb new file mode 100644 index 0000000..9577e21 --- /dev/null +++ b/test/FrontendAda/array_ref.adb @@ -0,0 +1,11 @@ +-- RUN: %llvmgcc -c %s +procedure Array_Ref is + type A is array (Natural range <>, Natural range <>) of Boolean; + type A_Access is access A; + function Get (X : A_Access) return Boolean is + begin + return X (0, 0); + end; +begin + null; +end; |