RosettaCodeData/Task/Empty-program/Ada/empty-program.adb

procedure Empty is
begin
   null;
end;