mirror of
https://github.com/vishapoberon/vipak.git
synced 2026-04-06 04:52:26 +00:00
nothing should work. just checking in.
This commit is contained in:
commit
4acd41201c
5 changed files with 242 additions and 0 deletions
28
netdb.Mod
Normal file
28
netdb.Mod
Normal file
|
|
@ -0,0 +1,28 @@
|
|||
MODULE netdb;
|
||||
|
||||
IMPORT SYSTEM;
|
||||
|
||||
TYPE
|
||||
Int32* = INTEGER;
|
||||
Int64* = LONGINT;
|
||||
|
||||
TYPE
|
||||
PaddrInfo = POINTER [1] TO addrInfo;
|
||||
|
||||
addrInfo* = RECORD
|
||||
aiFlags*: Int32;
|
||||
aiFamily*:Int32;
|
||||
aiSockType*: Int32;
|
||||
aiProtocol*: Int32;
|
||||
aiAddrLen*: Int32;
|
||||
aiAddr*, aiCanonName*, aiNext*: LONGINT; (* pointers *)
|
||||
END;
|
||||
|
||||
|
||||
PROCEDURE getAddrInfo*(VAR node, service: ARRAY OF CHAR; VAR hints: addrInfo; res: LONGINT): Int32
|
||||
"getaddrinfo (node, service, hints, res)";
|
||||
|
||||
PROCEDURE freeAddrInfo*(VAR res: addrInfo)
|
||||
"freeaddrinfo(res)";
|
||||
|
||||
END netdb.
|
||||
Loading…
Add table
Add a link
Reference in a new issue