+ support for register variables which contain records

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@3580 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 6 insertions, 0 deletions

diff --git a/compiler/cgutils.pas b/compiler/cgutils.pas
index e485ca4d4c..26b3206a2d 100644
--- a/compiler/cgutils.pas
+++ b/compiler/cgutils.pas
@@ -93,6 +93,12 @@ unit cgutils;
                 2 : (register64 : tregister64);
 {$endif cpu64bit}
               );
+            LOC_SUBSETREG,
+            LOC_CSUBSETREG : (
+              subsetreg : tregister;
+              startbit: byte;
+              subsetregsize: tcgsize;
+            );
       end;