* fixed insertion of typed constants twice in bss after r18723

for non-jvm targets (and once using a mangled name for global
    variables rather than for typed constants)

git-svn-id: branches/jvmbackend@18794 -

compiler/pdecvar.pas

@@ -1762,6 +1762,7 @@ implementation
                      fieldvs:=tfieldvarsym(sc[i]);
                      fieldvs.visibility:=visibility;
                      hstaticvs:=make_field_static(recst,fieldvs);
+                     cnodeutils.insertbssdata(hstaticvs);
                      if vd_final in options then
                        hstaticvs.varspez:=vs_final;
                    end;

compiler/symcreat.pas

@@ -1165,7 +1165,6 @@ implementation
 {$else jvm}
       include(hstaticvs.symoptions,sp_internal);
       tabstractrecordsymtable(recst).get_unit_symtable.insert(hstaticvs);
-      cnodeutils.insertbssdata(hstaticvs);
 {$endif jvm}
       { generate the symbol for the access }
       sl:=tpropaccesslist.create;