X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/170e475daffeb198914a020e26afaf803a6f9608..987e8123d8ba3201ed2690004cfefd7983ff7487:/lmessages.pas?ds=inline diff --git a/lmessages.pas b/lmessages.pas index 1302e29..1b7db62 100755 --- a/lmessages.pas +++ b/lmessages.pas @@ -14,6 +14,11 @@ interface uses pgtypes,sysutils,bsearchtree,strings,syncobjs; + +{$if (fpc_version < 2) or ((fpc_version=2) and ((fpc_release < 2) or ((fpc_release = 2) and (fpc_patch < 2)) ))} + {$error this code is only supported under fpc 2.2.2 and above due to bugs in the eventobject code in older versions} +{$endif} + type lparam=taddrint; wparam=taddrint;