llvm-mirror/test/FrontendAda/non_lvalue.adb

mirror of https://github.com/RPCS3/llvm-mirror.git synced 2024-10-25 05:52:53 +02:00
-- 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;
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. llvm-svn: 40436 2007-07-23 15:41:53 +02:00			`-- RUN: %llvmgcc -c %s -I%p/Support`
move ada tests llvm-svn: 35629 2007-04-03 23:46:22 +02:00			`package body Non_LValue is`
			`function A (Y : U) return String is`
			`begin`
			`return Y.X.B;`
			`end;`
			`end;`