RosettaCodeData/Task/HTTP/Ada/http.ada
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

9 lines
219 B
Ada

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;