llvm/non_lvalue.adb at 271000d54504531b3e1056403a2bdf8453fae097 - llvm - Gitea: Git with a cup of tea

RPCS3/llvm

mirror of https://github.com/RPCS3/llvm.git synced 2024-11-25 21:00:00 +00:00

Duncan Sands 1b4b25696b For multipart tests, place the parts with no

RUN line in Support.  Give up on sending output
to /dev/null - this cannot always be arranged.


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@40436 91177308-0d34-0410-b5e6-96231b3b80d8

2007-07-23 13:41:53 +00:00

8 lines

144 B

Ada

Raw Blame History

 -- RUN: %llvmgcc -c %s -I%p/Support
 package body Non_LValue is
    function A (Y : U) return String is
    begin
       return Y.X.B;
    end;
 end;