Что ж, вы не обязаны находить что-то с таким точным интерфейсом, так как Text_IO является стандартной библиотекой и не может быть легко расширен третьими лицами таким образом.
Если бы файловая система вашей платформы быладля поддержки HTTP, тогда он будет работать так, как вы хотите.Однако я не знаю ни одной платформы, которая бы работала таким образом.
В качестве общего решения вам, вероятно, понадобится AWS (Ada Web Server) .Человек может использовать это для реализации полноценного веб-сервера, если он хочет, но он также содержит средства клиента HTTP.HTTP-клиент будет тем, что вы хотите (см. AWS.Client).С вашей стороны это будет немного больше работы, чем просто один стандартный вызов API, но, вероятно, не слишком много работы.
Вот пример, написанный из Rosetta Code :
with Ada.Text_IO;
use Ada.Text_IO;
with AWS.Client;
with AWS.Response;
procedure HTTP_Request is
begin
Put_Line (AWS.Response.Message_Body (AWS.Client.Get (URL => "http://www.rosettacode.org")));
end HTTP_Request;