* code generator support for subsetreferences (memory locations which

    are not a multiple of 8 bits, nor necessarily aligned at a
    multiple of 8 bits). Supports both constant and variable bit
    indices.


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

1 files changed, 9 insertions, 0 deletions

diff --git a/compiler/cgutils.pas b/compiler/cgutils.pas
index 192c9e7e34..7c3a8ca300 100644
--- a/compiler/cgutils.pas
+++ b/compiler/cgutils.pas
@@ -67,6 +67,12 @@ unit cgutils;
         subsetregsize: tcgsize;
       end;
 
+      tsubsetreference = record
+        ref: treference;
+        bitindexreg: tregister;
+        startbit, bitlen: byte;
+      end;
+
       tlocation = record
          loc  : TCGLoc;
          size : TCGSize;
@@ -103,6 +109,9 @@ unit cgutils;
             LOC_CSUBSETREG : (
               sreg: tsubsetregister;
             );
+            LOC_SUBSETREF : (
+              sref: tsubsetreference;
+            )
       end;