Explorar o código

* loadvmtaddrnode accesses global data only when left.nodetype=typen.

git-svn-id: trunk@26742 -
sergei %!s(int64=11) %!d(string=hai) anos
pai
achega
07ce8f46a4
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      compiler/nmem.pas

+ 2 - 1
compiler/nmem.pas

@@ -231,7 +231,8 @@ implementation
       begin
          result:=nil;
          expectloc:=LOC_REGISTER;
-         if (cs_create_pic in current_settings.moduleswitches) then
+         if (left.nodetype=typen) and
+            (cs_create_pic in current_settings.moduleswitches) then
            include(current_procinfo.flags,pi_needs_got);
          if left.nodetype<>typen then
            begin