diff options
Diffstat (limited to 'vfs')
| -rw-r--r-- | vfs/uVFSprototypes.pas | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/vfs/uVFSprototypes.pas b/vfs/uVFSprototypes.pas index a67b303..5f0106c 100644 --- a/vfs/uVFSprototypes.pas +++ b/vfs/uVFSprototypes.pas @@ -27,6 +27,10 @@ unit uVFSprototypes; interface +{$IFDEF FPC} + {$PACKRECORDS C} +{$ENDIF} + const cVFSVersion = 4; // current version of the VFS API @@ -106,7 +110,7 @@ type PVFSItem = ^TVFSItem; - TVFSItem = packed record + TVFSItem = record {$IFNDEF CPU64} // 32-bit platform FName: PChar; // FDisplayName - plugins must ensure correct UTF-8 string @@ -121,7 +125,7 @@ type sLinkTo: PChar; iUID: Integer; iGID: Integer; - ItemType: TVFSItemType; + ItemType: Integer; {$ELSE} // 64-bit platform FName: PChar; FDisplayName: PChar; @@ -141,7 +145,7 @@ type end; // This structure contains basic informations about the plugin (Name is used to identify the module in the application) - TVFSInfo = packed record + TVFSInfo = record Name: PChar; Description: PChar; About: PChar; |