[svn:parrot] r47709 - in trunk: include/parrot src

[NotFound at svn.parrot.org]

Author: NotFound
Date: Sat Jun 19 12:15:16 2010
New Revision: 47709
URL: https://trac.parrot.org/parrot/changeset/47709

Log:
kill unused and unuseful function key_new_pmc

Modified:
   trunk/include/parrot/key.h
   trunk/src/key.c

Modified: trunk/include/parrot/key.h
==============================================================================
--- trunk/include/parrot/key.h	Sat Jun 19 12:05:46 2010	(r47708)
+++ trunk/include/parrot/key.h	Sat Jun 19 12:15:16 2010	(r47709)
@@ -88,13 +88,6 @@
 PARROT_EXPORT
 PARROT_CANNOT_RETURN_NULL
 PARROT_WARN_UNUSED_RESULT
-PMC * key_new_pmc(PARROT_INTERP, ARGIN(PMC *value))
-        __attribute__nonnull__(1)
-        __attribute__nonnull__(2);
-
-PARROT_EXPORT
-PARROT_CANNOT_RETURN_NULL
-PARROT_WARN_UNUSED_RESULT
 PMC * key_new_string(PARROT_INTERP, ARGIN(STRING *value))
         __attribute__nonnull__(1)
         __attribute__nonnull__(2);
@@ -190,9 +183,6 @@
        PARROT_ASSERT_ARG(interp))
 #define ASSERT_ARGS_key_new_number __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp))
-#define ASSERT_ARGS_key_new_pmc __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp) \
-    , PARROT_ASSERT_ARG(value))
 #define ASSERT_ARGS_key_new_string __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(value))

Modified: trunk/src/key.c
==============================================================================
--- trunk/src/key.c	Sat Jun 19 12:05:46 2010	(r47708)
+++ trunk/src/key.c	Sat Jun 19 12:15:16 2010	(r47709)
@@ -146,31 +146,6 @@
     return key_new_string(interp, Parrot_str_new(interp, value, 0));
 }
 
-
-/*
-
-=item C<PMC * key_new_pmc(PARROT_INTERP, PMC *value)>
-
-Returns a new PMC C<Key> PMC with value C<value>.
-
-=cut
-
-*/
-
-PARROT_EXPORT
-PARROT_CANNOT_RETURN_NULL
-PARROT_WARN_UNUSED_RESULT
-PMC *
-key_new_pmc(PARROT_INTERP, ARGIN(PMC *value))
-{
-    ASSERT_ARGS(key_new_pmc)
-    PMC * const key = Parrot_pmc_new(interp, enum_class_Key);
-
-    PObj_get_FLAGS(key) |= KEY_pmc_FLAG;
-    Parrot_ex_throw_from_c_args(interp, NULL, 1, "this is broken - see slice.pmc");
-}
-
-
 /*
 
 =item C<void key_set_integer(PARROT_INTERP, PMC *key, INTVAL value)>