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

* Rename RecordOp to ManagementOp (more relevant name)

git-svn-id: trunk@35453 -
maciej-izak 8 years ago
parent
92c0e57c59
commit
3900ccf260
1 changed files with 1 additions and 1 deletions
Unified View Show Diff Stats
  1. 1 1
      rtl/objpas/typinfo.pp

+ 1 - 1
rtl/objpas/typinfo.pp
View File 

@@ -341,7 +341,7 @@ unit typinfo;
 
         Terminator: Pointer;
 
         Terminator: Pointer;
 
         Size: Integer;
 
         Size: Integer;
 
 {$ifdef FPC_HAS_MANAGEMENT_OPERATORS}
 
 {$ifdef FPC_HAS_MANAGEMENT_OPERATORS}
 
-        RecordOp: Pointer;
 
+        ManagementOp: Pointer;
 
 {$endif}
 
 {$endif}
 
         ManagedFieldCount: Integer;
 
         ManagedFieldCount: Integer;
 
         { ManagedFields: array[0..ManagedFieldCount - 1] of TInitManagedField ; }
 
         { ManagedFields: array[0..ManagedFieldCount - 1] of TInitManagedField ; }