From 0ab106fa3963e843ba71b6963f0309bf7c0ec51f Mon Sep 17 00:00:00 2001
From: Peter Lobsinger <plobsing@gmail.com>
Date: Sat, 20 Aug 2011 00:00:56 -0400
Subject: [PATCH] kill unused, dangerously encapsulation-breaking function

---
 include/parrot/call.h |  9 ---------
 src/call/context.c    | 18 ------------------
 2 files changed, 27 deletions(-)

diff --git a/include/parrot/call.h b/include/parrot/call.h
index 24edb883ec..5163939f6e 100644
--- a/include/parrot/call.h
+++ b/include/parrot/call.h
@@ -431,13 +431,6 @@ void Parrot_pcc_set_regs_ps(PARROT_INTERP,
         __attribute__nonnull__(2)
         __attribute__nonnull__(3);
 
-PARROT_EXPORT
-void Parrot_pcc_set_regs_used(PARROT_INTERP,
-    ARGIN(PMC *ctx),
-    int type,
-    INTVAL num)
-        __attribute__nonnull__(2);
-
 PARROT_EXPORT
 void Parrot_pcc_set_sub(PARROT_INTERP,
     ARGIN(PMC *ctx),
@@ -526,8 +519,6 @@ PMC * Parrot_set_new_context(PARROT_INTERP,
 #define ASSERT_ARGS_Parrot_pcc_set_regs_ps __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(ctx) \
     , PARROT_ASSERT_ARG(bp_ps))
-#define ASSERT_ARGS_Parrot_pcc_set_regs_used __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(ctx))
 #define ASSERT_ARGS_Parrot_pcc_set_sub __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(ctx))
diff --git a/src/call/context.c b/src/call/context.c
index d1d84d23dc..d5ec33595f 100644
--- a/src/call/context.c
+++ b/src/call/context.c
@@ -730,24 +730,6 @@ Parrot_pcc_get_regs_used(SHIM_INTERP, ARGIN(const PMC *ctx), int type)
 
 /*
 
-=item C<void Parrot_pcc_set_regs_used(PARROT_INTERP, PMC *ctx, int type, INTVAL
-num)>
-
-Set number of used registers of particular type.
-
-=cut
-
-*/
-PARROT_EXPORT
-void
-Parrot_pcc_set_regs_used(SHIM_INTERP, ARGIN(PMC *ctx), int type, INTVAL num)
-{
-    ASSERT_ARGS(Parrot_pcc_set_regs_used)
-    CONTEXT_STRUCT(ctx)->n_regs_used[type] = num;
-}
-
-/*
-
 =item C<Regs_ni* Parrot_pcc_get_regs_ni(PARROT_INTERP, const PMC *ctx)>
 
 Get pointer to FLOANFAL and INTVAL registers.