paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 14:19:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ missing CVS logs added

Browse Source
This commit is contained in:
Tomas Hajny 2004-07-17 10:13:09 +00:00
parent 581c8a68e2
commit 4e64f86456
2 changed files with 37 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
rtl/os2/so32dll.pas
View File

@ -1,7 +1,12 @@
{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 2000, 2001 by madded2 (madded@vao.udmnet.ru).
Copyright (c) 2002, 2004 Yuri Prokushev (prokushev@freemail.ru).
/c/ 2000, 2001 by madded2 (madded@vao.udmnet.ru).
(C) 2002, 2004 Yuri Prokushev (prokushev@freemail.ru
Interface to OS/2 32-bit sockets library
**********************************************************************
Inet & Sockets Unit v1.04.
/c/ 2000, 2001 by madded2 (madded@vao.udmnet.ru).
@ -10,13 +15,12 @@
for help use tcppr.inf and C samples from toolkit.
without res_* and dh_* funcs, and have very
bad suppot for select() and ioctl() funcs
bad support for select() and ioctl() funcs
new in ver 1.04 : little ioctl() & iptrace support + errors SOCE* constants
new in ver 1.03 : used inet_lib.lib file for fixing VP linker bug
new in ver 1.02 : $saves sections, need for correct registers operations
new in ver 1.01 : ip header struct
}
{
@abstract(a unit to handle sockets)
@ -1573,4 +1577,12 @@ const
³ 00038 ³ WINSOCKCLEANUPSOCKETS
³ 00039 ³ GETSOCKETFROMLIST
À´Done
*)
*)
{
$Log$
Revision 1.2 2004-07-17 10:13:09 hajny
+ missing CVS logs added
}

22
rtl/os2/sockets.pas
View File

@ -1,8 +1,18 @@
{
$Id$
This file is part of the Free Pascal run time library.
Copyright (c) 2002 Yuri Prokushev
(C) 2002 Yuri Prokushev
Sockets implementation for OS/2
}
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
{$MODE ObjFPC}
unit Sockets;
@ -295,3 +305,11 @@ end;
Begin
so32dll.sock_init;
End.
{
$Log$
Revision 1.2 2004-07-17 10:13:09 hajny
+ missing CVS logs added
}