Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* fix for win64 compilation failure of last night

git-svn-id: trunk@10265 -
marco 17 years ago
parent
59d9169bbd
commit
3f3105172d
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      packages/winunits-base/src/imagehlp.pp

+ 1 - 1
packages/winunits-base/src/imagehlp.pp
View File 

@@ -371,8 +371,8 @@ Type
 
   LOADED_IMAGE   = TLOADED_IMAGE;
 
   LOADED_IMAGE   = TLOADED_IMAGE;
 
   PLOADED_IMAGE  = ^TLOADED_IMAGE;
 
   PLOADED_IMAGE  = ^TLOADED_IMAGE;
 
   PPLOADED_IMAGE = ^PLOADED_IMAGE;
 
   PPLOADED_IMAGE = ^PLOADED_IMAGE;
 
-  PIMAGE_DEBUG_INFORMATION = ^TIMAGE_DEBUG_INFORMATION;
 
 {$ifndef win64}  
 {$ifndef win64}  
+  PIMAGE_DEBUG_INFORMATION = ^TIMAGE_DEBUG_INFORMATION;
 
   TIMAGE_DEBUG_INFORMATION = packed record
 
   TIMAGE_DEBUG_INFORMATION = packed record
 
           List : TLISTENTRY;
 
           List : TLISTENTRY;
 
           ReservedSize : DWORD;
 
           ReservedSize : DWORD;