Browse Source

* recognise LOC_CREFERENCE in tllvmsubscriptnode.handle_platform_subscript()

git-svn-id: branches/hlcgllvm@28364 -
Jonas Maebe 11 years ago
parent
commit
6ab2c00ac6
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/llvm/nllvmmem.pas

+ 1 - 1
compiler/llvm/nllvmmem.pas

@@ -68,7 +68,7 @@ implementation
         llvmfielddef: tdef;
         llvmfielddef: tdef;
         newbase: tregister;
         newbase: tregister;
       begin
       begin
-        if location.loc<>LOC_REFERENCE then
+        if not(location.loc in [LOC_REFERENCE,LOC_CREFERENCE]) then
           internalerror(2014011905);
           internalerror(2014011905);
         if is_packed_record_or_object(left.resultdef) then
         if is_packed_record_or_object(left.resultdef) then
           begin
           begin