- removed useless ansistring pointer def creation from r32209

git-svn-id: trunk@32210 -

compiler/aasmcnst.pas

@@ -1641,7 +1641,6 @@ implementation
    procedure ttai_typedconstbuilder.queue_emit_const(cs: tconstsym);
      var
        resourcestrrec: trecorddef;
-       ansiptr: tdef;
      begin
        if cs.consttyp<>constresourcestring then
          internalerror(2014062102);
@@ -1652,7 +1651,6 @@ implementation
          constresourcestring:
            begin
              resourcestrrec:=trecorddef(search_system_type('TRESOURCESTRINGRECORD').typedef);
-             ansiptr:=cpointerdef.getreusable(cansistringtype);
              queue_subscriptn_multiple_by_name(resourcestrrec,['CURRENTVALUE']);
              queue_emit_asmsym(current_asmdata.RefAsmSymbol(
                make_mangledname('RESSTR',cs.owner,cs.name),AT_DATA),cansistringtype