cvs commit: parrot/imcc cfg.c imc.c

[Melvin Smith]

cvsuser     03/12/06 07:24:44

  Modified:    imcc     cfg.c imc.c
  Log:
  More trace tweaks, too much noise output on default level trace.
  
  Revision  Changes    Path
  1.56      +2 -2      parrot/imcc/cfg.c
  
  Index: cfg.c
  ===================================================================
  RCS file: /cvs/public/parrot/imcc/cfg.c,v
  retrieving revision 1.55
  retrieving revision 1.56
  diff -u -w -r1.55 -r1.56
  --- cfg.c     19 Nov 2003 07:20:21 -0000      1.55
  +++ cfg.c     6 Dec 2003 15:24:43 -0000       1.56
  @@ -486,7 +486,7 @@
   {
       int i;
   
  -#if IMC_TRACE
  +#if IMC_TRACE_HIGH
       fprintf(stderr, "cfg.c: analyse_life_symbol(%s)\n", r->name);
   #endif
   
  @@ -524,7 +524,7 @@
   free_life_info(IMC_Unit * unit, SymReg *r)
   {
       int i;
  -#if IMC_TRACE
  +#if IMC_TRACE_HIGH
       fprintf(stderr, "free_life_into(%s)\n", r->name);
   #endif
       if (r->life_info) {
  
  
  
  1.67      +3 -1      parrot/imcc/imc.c
  
  Index: imc.c
  ===================================================================
  RCS file: /cvs/public/parrot/imcc/imc.c,v
  retrieving revision 1.66
  retrieving revision 1.67
  diff -u -w -r1.66 -r1.67
  --- imc.c     17 Nov 2003 00:44:33 -0000      1.66
  +++ imc.c     6 Dec 2003 15:24:43 -0000       1.67
  @@ -35,8 +35,10 @@
           {
               Instruction *ins = unit->instructions;
               if(ins->r[1] && ins->r[1]->pcc_sub) {
  +#if IMC_TRACE_HIGH
                   fprintf(stderr, "UNIT[%d] : pcc_sub %s (nargs=%d)\n",
                        i, ins->r[1]->name, ins->r[1]->pcc_sub->nargs);
  +#endif
               }
           }
   
  @@ -183,7 +185,7 @@
   {
       imc_info_t *imc = interp->imc_info;
   
  -#if IMC_TRACE
  +#if IMC_TRACE_HIGH
       fprintf(stderr, "imc_free_unit()\n");
   #endif