example.ada

with Ada.Text_IO;

procedure Example is
  use Ada.Text_IO;
begin
  Put_Line ("Foo"); -- This is Ada.Text_IO.Put_Line if we don't have the use statement.
end Example;