X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/761d18c70e4e766e9ce1bc9138369e6e917bab20..ac55319310f2e0b8ac5d848c1591b5e72d49c9b3:/lmessages.pas diff --git a/lmessages.pas b/lmessages.pas index e17ccfe..d7e4008 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;