Sfoglia il codice sorgente

* do not create an fpc_zeromem node if size=0

git-svn-id: trunk@27224 -
florian 11 anni fa
parent
commit
04464b8622
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/psub.pas

+ 1 - 1
compiler/psub.pas

@@ -217,7 +217,7 @@ implementation
          exit;
         with tabstractnormalvarsym(p) do
          begin
-           if vo_is_default_var in varoptions then
+           if (vo_is_default_var in varoptions) and (vardef.size>0) then
              begin
                b:=tblocknode(arg);
                b.left:=cstatementnode.create(