with Ada.Text_IO;

procedure Foo is
begin
   Ada.Text_IO.Put_Line ("Hello, world!");
end Foo;