Toss two dead ops.

rakudo · Mar 2, 2013 · 7de7725 · 7de7725
1 parent 0087ce6
commit 7de7725
Showing 1 changed file with 0 additions and 28 deletions.
diff --git a/src/ops/perl6.ops b/src/ops/perl6.ops
@@ -1685,34 +1685,6 @@ inline op perl6_clear_checking_pre() :base_core {
 }
 
 
-/*
-
-=item perl6_is_list(out INT, in PMC)
-
-Checks if the passed object is a RPA.
-
-=cut
-
-*/
-inline op perl6_is_list(out INT, in PMC) :base_core {
-    $1 = $2->vtable->base_type == enum_class_ResizablePMCArray;
-}
-
-
-/*
-
-=item perl6_is_hash(out INT, in PMC)
-
-Checks if the passed object is a (VM) hash.
-
-=cut
-
-*/
-inline op perl6_is_hash(out INT, in PMC) :base_core {
-    $1 = $2->vtable->base_type == enum_class_Hash;
-}
-
-
 /*
 
 =item perl6_parcel_from_rpa(out PMC, in PMC, in PMC)