aboutsummaryrefslogtreecommitdiffstats
path: root/test/FrontendAda/non_lvalue.adb
blob: 71e7e102d05b61ec92e8deba9d0e5aaa33f025e5 (plain)
1
2
3
4
5
6
7
-- RUN: %llvmgcc -S %s -I%p/Support
package body Non_LValue is
   function A (Y : U) return String is
   begin
      return Y.X.B;
   end;
end;