X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/0ac6b47e810e6efaebcdbf3075b633e9b4109341..2d2676149292e4e388bb102a41a3d64349ac88ed:/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;