Sockets: Difference between revisions
Content added Content deleted
m (→{{header|Purebasic}}: Capitalization error) |
(Unicon) |
||
| Line 522: | Line 522: | ||
#! The actual server |
#! The actual server |
||
[ " hello socket world" server.send ] 256 server.start</lang> |
[ " hello socket world" server.send ] 256 server.start</lang> |
||
=={{header|Unicon}}== |
|||
Unicon integrated TCP/IP networking and messaging. |
|||
<lang unicon>procedure main(arglist) #: usage socket port hostname or socket port |
|||
hello(arglist[2]|"",arglist[1]) |
|||
end |
|||
procedure hello(host,port) |
|||
local s |
|||
/host := "" |
|||
host ||:= ":" |
|||
host ||:= 0 < 65536 > port | runerr(103,port) |
|||
return write( s := open(host,"n") | stop("Unable to connect to ",host,":",port), "hello socket world.") & close(s) |
|||
end</lang> |
|||
=={{header|UnixPipes}}== |
=={{header|UnixPipes}}== |
||