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

rtl-extra: actually, SocketBase should be a threadvar on AROS too. thanks to Marcus for finding this. lets hope everything else is in place for this to even work...

Browse Source 
git-svn-id: trunk@32691 -
This commit is contained in:
Károly Balogh 2015-12-20 22:46:02 +00:00
parent 698ca04d90
commit 62efd8c156
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl-extra/src/aros/sockets.pp
View File

@ -110,7 +110,7 @@ Function Accept(Sock:longint;var addr:string;var SockIn,SockOut:File):Boolean;
//function fpbind (s:cint; addrx : psockaddr; addrlen : tsocklen):cint; maybelibc
//function fpconnect (s:cint; name : psockaddr; namelen : tsocklen):cint; maybelibc
var
threadvar
SocketBase: PLibrary;
function bsd_socket(Domain: LongInt; Type_: LongInt; Protocol: LongInt): LongInt; syscall SocketBase 5;