cvs commit: parrot/languages/imcc cfg.c

[Steve Fink]

cvsuser     03/02/23 12:21:09

  Modified:    languages/imcc cfg.c
  Log:
  Do not free constant string
  
  Revision  Changes    Path
  1.20      +2 -2      parrot/languages/imcc/cfg.c
  
  Index: cfg.c
  ===================================================================
  RCS file: /cvs/public/parrot/languages/imcc/cfg.c,v
  retrieving revision 1.19
  retrieving revision 1.20
  diff -u -w -r1.19 -r1.20
  --- cfg.c     23 Feb 2003 13:17:34 -0000      1.19
  +++ cfg.c     23 Feb 2003 20:21:09 -0000      1.20
  @@ -310,9 +310,9 @@
                ins = curr;
            }
        }
  -        /* invoke w/o arg implicitely uses P0, so mark it doin so */
  +        /* invoke w/o arg implicitly uses P0, so mark it as doing so */
           else if (ins->opsize == 1 && !strcmp(ins->op, "invoke")) {
  -            SymReg * p0 = mk_pasm_reg("P0");
  +            SymReg * p0 = mk_pasm_reg(str_dup("P0"));
               add_instruc_reads(ins, p0);
               p0->use_count++;
           }