Anonymous user
Hostname: Difference between revisions
→{{header|Ada}}
No edit summary |
|||
Line 4:
=={{header|Ada}}==
with GNAT.Sockets;
with Ada.Text_IO;
<pre>
procedure Hostname is
begin
Ada.Text_IO.Put_Line(GNAT.Sockets.Host_Name);
end Hostname
</pre>
=={{header|C}}==
| |||