llvm-project/llvm/test/FrontendAda/asm.adb

forked from OSchip/llvm-project
-- RUN: %llvmgcc -S %s
with System.Machine_Code;
procedure Asm is
begin
   System.Machine_Code.Asm ("");
end;
Dragonegg cannot output bitcode, only human readable IR, so use -S rather than -c. llvm-svn: 120157 2010-11-26 05:21:59 +08:00			`-- RUN: %llvmgcc -S %s`
Test that inline assembler compiles (llvm-gcc added an extra "uses" parameter to ASM_EXPR). llvm-svn: 36644 2007-05-02 15:41:22 +08:00			`with System.Machine_Code;`
			`procedure Asm is`
			`begin`
			`System.Machine_Code.Asm ("");`
			`end;`