Browse Source

* last fix was most likely not complete

git-svn-id: trunk@43712 -
florian 5 years ago
parent
commit
8b24033e93
1 changed files with 2 additions and 1 deletions
  1. 2 1
      rtl/inc/heaptrc.pp

+ 2 - 1
rtl/inc/heaptrc.pp

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