Sockets: Difference between revisions
Content deleted Content added
m Ada syntax clarification |
|||
Line 10: | Line 10: | ||
procedure Socket_Send is |
procedure Socket_Send is |
||
Client : Socket_Type; |
Client : Socket_Type; |
||
begin |
begin |
||
Line 21: | Line 20: | ||
String'Write (Stream (Client), "hello socket world"); |
String'Write (Stream (Client), "hello socket world"); |
||
Close_Socket (Client); |
Close_Socket (Client); |
||
end Socket_Send;</lang> |
end Socket_Send;</lang> |
||