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