<*+ CSTDLIB *> <*- NOHEADER *> <*+ M2EXTENSIONS *> DEFINITION MODULE ["C"] tcpb; FROM SYSTEM IMPORT BYTE; PROCEDURE connecttob(VAR url,port:ARRAY OF CHAR):INTEGER; PROCEDURE readsockb(fd:INTEGER; VAR buf:ARRAY OF BYTE; len:INTEGER):INTEGER; END tcpb.