[src/glue/enum.pir] two fixes

- s/Perl6Pair/Pair/ - removed cloning step
rakudo · Feb 17, 2010 · e23a053 · e23a053
1 parent f592840
commit e23a053
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/glue/enum.pir b/src/glue/enum.pir
@@ -30,7 +30,7 @@ Constructs a EnumMap, based upon the values list.
   values_loop:
     unless values_it goto values_loop_end
     cur_item = shift values_it
-    $I0 = isa cur_item, 'Perl6Pair'
+    $I0 = isa cur_item, 'Pair'
     if $I0 goto pair
 
   nonpair:
@@ -42,7 +42,6 @@ Constructs a EnumMap, based upon the values list.
     cur_val = cur_item.'value'()
     $P0 = cur_item.'key'()
     enumhash[$P0] = cur_val
-    cur_val = clone cur_val    # XXX Don't know if this is needed
     cur_val = cur_val.'succ'()
     goto values_loop