cvsuser     04/02/23 00:52:23

  Modified:    classes  timer.pmc
  Log:
  removed unreachable
  
  Revision  Changes    Path
  1.15      +9 -15     parrot/classes/timer.pmc
  
  Index: timer.pmc
  ===================================================================
  RCS file: /cvs/public/parrot/classes/timer.pmc,v
  retrieving revision 1.14
  retrieving revision 1.15
  diff -u -w -r1.14 -r1.15
  --- timer.pmc 22 Feb 2004 17:48:41 -0000      1.14
  +++ timer.pmc 23 Feb 2004 08:52:23 -0000      1.15
  @@ -1,6 +1,6 @@
   /*
   Copyright: 2001-2003 The Perl Foundation.  All Rights Reserved.
  -$Id: timer.pmc,v 1.14 2004/02/22 17:48:41 mikescott Exp $
  +$Id: timer.pmc,v 1.15 2004/02/23 08:52:23 leo Exp $
   
   =head1 NAME
   
  @@ -233,9 +233,6 @@
           switch(key) {
               case PARROT_TIMER_HANDLER:
                   return t->sub;
  -                break;
  -            default:
  -                return PMCNULL;
           }
           return PMCNULL;
       }
  @@ -256,7 +253,6 @@
           switch(key) {
               case PARROT_TIMER_NSEC:
                   return t->abs_time;
  -                break;
           }
           return -1.0;
       }
  @@ -311,8 +307,6 @@
               case PARROT_TIMER_HANDLER:
                   t->sub = value;
               break;
  -                default:
  -            break;
           }
       }
   
  
  
  

Reply via email to