[svn:parrot] r34409 - trunk/src

Author: petdance
Date: Fri Dec 26 22:35:57 2008
New Revision: 34409

Modified:
   trunk/src/global.c
   trunk/src/hll.c
   trunk/src/inter_call.c

Log:
removing unused vars

Modified: trunk/src/global.c
==============================================================================
--- trunk/src/global.c	(original)
+++ trunk/src/global.c	Fri Dec 26 22:35:57 2008
@@ -101,10 +101,8 @@
 static PMC *
 internal_ns_keyed(PARROT_INTERP, ARGIN(PMC *base_ns), ARGIN(PMC *pmc_key), int flags)
 {
-    PMC *sub_ns;
     PMC *ns = base_ns;
     INTVAL i, n;
-    static const INTVAL max_intval = (INTVAL)((~(UINTVAL)0) >> 1); /*2s comp*/
 
     if (pmc_key->vtable->base_type == enum_class_String) {
         STRING *str_key = VTABLE_get_string(interp, pmc_key);
@@ -118,6 +116,8 @@
 
     for (i = 0; i < n; ++i) {
         STRING *part;
+        PMC *sub_ns;
+
         if (!pmc_key)
             Parrot_ex_throw_from_c_args(interp, NULL, 1,
                 "Passed a NULL pmc_key into VTABLE_get_string_keyed_int");

Modified: trunk/src/hll.c
==============================================================================
--- trunk/src/hll.c	(original)
+++ trunk/src/hll.c	Fri Dec 26 22:35:57 2008
@@ -344,8 +344,7 @@
 Parrot_register_HLL_type(PARROT_INTERP, INTVAL hll_id,
         INTVAL core_type, INTVAL hll_type)
 {
-    PMC  *entry, *type_hash, *instantiated;
-    Hash *hash;
+    PMC  *entry, *type_hash;
     PMC  *hll_info = interp->HLL_info;
     const INTVAL n = VTABLE_elements(interp, hll_info);
 

Modified: trunk/src/inter_call.c
==============================================================================
--- trunk/src/inter_call.c	(original)
+++ trunk/src/inter_call.c	Fri Dec 26 22:35:57 2008
@@ -2625,7 +2625,6 @@
     /* args_sig, results_sig */
     PMC *sigs[2];
 
-    const char *x;
     const char *ret_x  = NULL;
 
     indexes[0] = arg_indexes;

• [svn:parrot] r34409 - trunk/src by petdance