Bläddra i källkod

* no refcount needed for all constants instead of only stringconst

git-svn-id: trunk@8426 -
peter 18 år sedan
förälder
incheckning
6b8a5e56b6
1 ändrade filer med 2 tillägg och 2 borttagningar
  1. 2 2
      compiler/ncgld.pas

+ 2 - 2
compiler/ncgld.pas

@@ -530,9 +530,9 @@ implementation
          begin
            secondpass(right);
            { increment source reference counter, this is
-             useless for string constants}
+             useless for constants }
            if (right.resultdef.needs_inittable) and
-              (right.nodetype<>stringconstn) then
+              not is_constnode(right) then
             begin
               location_force_mem(current_asmdata.CurrAsmList,right.location);
               location_get_data_ref(current_asmdata.CurrAsmList,right.location,href,false);