Add more UNUSED() declarations to key.pmc and core.ops

parrot · Sep 18, 2012 · ef4b571 · ef4b571
1 parent a95f757
commit ef4b571
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 7 deletions.
diff --git a/src/ops/core.ops b/src/ops/core.ops
@@ -58,6 +58,8 @@ Halts the interpreter. See also B<exit>.
 =cut
 
 inline op end()  :check_event :flow {
+    UNUSED(interp);
+    UNUSED(cur_opcode);
     goto ADDRESS(0);
 }
 
@@ -97,7 +99,6 @@ actions on it.
 
 inline op noop()  {
     UNUSED(interp);
-    UNUSED(CUR_OPCODE);
 }
 
 inline op check_events()  :flow {

diff --git a/src/ops/core_ops.c b/src/ops/core_ops.c
@@ -13605,13 +13605,14 @@ static op_info_t core_op_info_table[1126] = {
 
 opcode_t *
 Parrot_end(opcode_t *cur_opcode, PARROT_INTERP) {
+    UNUSED(interp);
+    UNUSED(cur_opcode);
     return (opcode_t *)0;
 }
 
 opcode_t *
 Parrot_noop(opcode_t *cur_opcode, PARROT_INTERP) {
     UNUSED(interp);
-    UNUSED(CUR_OPCODE);
     return cur_opcode + 1;
 }
 
@@ -13746,15 +13747,13 @@ Parrot_local_return_p(opcode_t *cur_opcode, PARROT_INTERP) {
 
 opcode_t *
 Parrot_jump_i(opcode_t *cur_opcode, PARROT_INTERP) {
-    opcode_t  * const  loc = INTVAL2PTR(opcode_t *, IREG(1));
-
+    opcode_t * const loc = INTVAL2PTR(opcode_t *, IREG(1));
     return (opcode_t *)loc;
 }
 
 opcode_t *
 Parrot_jump_ic(opcode_t *cur_opcode, PARROT_INTERP) {
-    opcode_t  * const  loc = INTVAL2PTR(opcode_t *, ICONST(1));
-
+    opcode_t * const loc = INTVAL2PTR(opcode_t *, ICONST(1));
     return (opcode_t *)loc;
 }
 

diff --git a/src/pmc/key.pmc b/src/pmc/key.pmc
@@ -42,6 +42,7 @@ Initializes the key.
 */
 
     VTABLE void init() {
+        UNUSED(INTERP)
         PObj_custom_mark_SET(SELF);
     }
 
@@ -186,7 +187,9 @@ Sets the value of the key to C<*value>.
 */
 
     VTABLE void set_pmc(PMC *value) {
-        Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_UNIMPLEMENTED,
+        UNUSED(SELF)
+        UNUSED(value)
+        Parrot_ex_throw_from_c_args(INTERP, NULL, EXCEPTION_UNIMPLEMENTED,
                 "this is broken - see TT #1683");
     }
 
@@ -245,6 +248,8 @@ Returns the key itself.
 */
 
     VTABLE PMC *get_pmc_keyed(PMC *key) {
+        UNUSED(INTERP)
+        UNUSED(SELF)
         return key;
     }
 
@@ -398,6 +403,7 @@ Aggregate interface.
 */
 
     VTABLE INTVAL elements() {
+        UNUSED(INTERP)
         INTVAL n = 0;
         for (; SELF; SELF = PARROT_KEY(SELF)->next_key)
             n++;