loop
   Put_Line("SPAM");
end loop;