X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/0ac6b47e810e6efaebcdbf3075b633e9b4109341..5c04c841812bdb200cc3c73169b1542aef6c2fc3:/lmessages.pas diff --git a/lmessages.pas b/lmessages.pas index b5a6f25..a7bd01e 100755 --- a/lmessages.pas +++ b/lmessages.pas @@ -99,7 +99,7 @@ procedure init; implementation uses - baseunix,unix,lcore,unixutil,ltimevalstuff;//,safewriteln; + baseunix,unix,lcore,unixutil,ltimevalstuff,sockets;//,safewriteln; {$i unixstuff.inc} type @@ -135,7 +135,7 @@ var //than crash after over four billion //windows have been made ;) nextwindowhandle : qword = $100000000; - + //findthreaddata should only be called while holding the structurelock function findthreaddata(threadid : integer) : tthreaddata;