手続き Status は、Sockets パッケージによって維持されている、開かれたソケット接続についての記述を返します。この記述は2つの要素リストの形をしています。返されるリストの1つめは、開かれた接続の数を表します。2つめの要素は、各開かれた接続ごとのエントリーを含むリストです。

開かれたソケットはそれぞれ、4つの要素からなるリストとして記述されます。１つめの要素は、その接続のソケット ID です。2つめの要素は、ソケットの種類を記述する文字列( "client", "acceptor", "unknown"または "server"のいずれか)です。接続中の peer のホスト名が、リストの3つめの構成物に、文字列として表されます。最後に、peer のポート番号が4つめの要素として与えられます。

with( Sockets ):
Status();

s := Open( "vulcan", "echo" ):
Status();

t := Open( "localhost", "daytime" ):
Status();

map( Close, map2( op, 1, Status()[2] ) );

Status();

参考文献

RFC 862 (Echo) at ftp://ftp.isi.edu/in-notes/rfc862.txt 

RFC 867 (Daytime) at ftp://ftp.isi.edu/in-notes/rfc867.txt