git-svn-id: trunk@43712 -
@@ -1264,12 +1264,13 @@ type
{$endif}
function GetModuleName:string;
-var
{$ifdef MSWINDOWS}
+var
sz:cardinal;
buf:array[0..8191] of char;
{$if defined(LINUX) or defined(BSD)}
res:integer;
dli:dl_info;