X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/0ac6b47e810e6efaebcdbf3075b633e9b4109341..055fa6bf18e0733d1bf2f97075d6bb33c76e72b5:/lmessages.pas?ds=inline 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;