cvs commit: parrot interpreter.c

[Leopold Toetsch]

cvsuser     03/01/31 07:38:31

  Modified:    .        interpreter.c
  Log:
  branch_cs fix trace message
  
  Revision  Changes    Path
  1.138     +3 -3      parrot/interpreter.c
  
  Index: interpreter.c
  ===================================================================
  RCS file: /cvs/public/parrot/interpreter.c,v
  retrieving revision 1.137
  retrieving revision 1.138
  diff -u -w -r1.137 -r1.138
  --- interpreter.c     31 Jan 2003 15:13:46 -0000      1.137
  +++ interpreter.c     31 Jan 2003 15:38:31 -0000      1.138
  @@ -1,7 +1,7 @@
   /* interpreter.c
    *  Copyright: (When this is determined...it will go here)
    *  CVS Info
  - *     $Id: interpreter.c,v 1.137 2003/01/31 15:13:46 leo Exp $
  + *     $Id: interpreter.c,v 1.138 2003/01/31 15:38:31 leo Exp $
    *  Overview:
    *     The interpreter api handles running the operations
    *  Data Structure and Algorithms:
  @@ -362,8 +362,8 @@
               offset = ft->fixups[interpreter->resume_offset]->u.t0.offset;
               Parrot_switch_to_cs(interpreter, seg);
               if (Interp_flags_TEST(interpreter, PARROT_TRACE_FLAG)) {
  -                PIO_eprintf(interpreter, "*** Resume at seg %d ofs %d\n",
  -                        (int)seg, (int)offset);
  +                PIO_eprintf(interpreter, "*** Resume at seg %s ofs %d\n",
  +                        seg->base.name, (int)offset);
               }
           }
       }