Parcourir la source

* fixed expectloc of unaligned(...)

git-svn-id: trunk@4830 -
florian il y a 19 ans
Parent
commit
bacded2cf8
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      compiler/ninl.pas

+ 1 - 1
compiler/ninl.pas

@@ -2553,7 +2553,7 @@ implementation
 {$ifdef SUPPORT_UNALIGNED}
          in_unaligned_x:
            begin
-             expectloc:=left.expectloc;
+             expectloc:=tcallparanode(left).left.expectloc;
            end;
 {$endif SUPPORT_UNALIGNED}
           else