-- RUN: %llvmgcc -c %s -o /dev/null
with System.Machine_Code;
procedure Asm is
begin
System.Machine_Code.Asm ("");
end;