[svn:parrot] r23768 - trunk/compilers/imcc

[paultcochrane]

Author: paultcochrane
Date: Tue Dec 11 14:55:00 2007
New Revision: 23768

Modified:
   trunk/compilers/imcc/pcc.c

Log:
[imcc] Removed "ignoring return value" compiler warnings


Modified: trunk/compilers/imcc/pcc.c
==============================================================================
--- trunk/compilers/imcc/pcc.c  (original)
+++ trunk/compilers/imcc/pcc.c  Tue Dec 11 14:55:00 2007
@@ -370,8 +370,10 @@
             tmp = INS(interp, unit, "end", NULL, regs, 0, 0, 0);
         }
         else {
-            pcc_get_args(interp, unit, unit->last_ins, "set_returns",
-                    0, NULL, NULL);
+            Instruction *unused_ins;
+            unused_ins = pcc_get_args(interp, unit, unit->last_ins,
+                    "set_returns", 0, NULL, NULL);
+            UNUSED(unused_ins);
             tmp = INS(interp, unit, "returncc", NULL, regs, 0, 0, 0);
         }
         IMCC_debug(interp, DEBUG_IMC, "add sub ret - %I\n", tmp);
@@ -576,7 +578,7 @@
 {
     SymReg *called_sub, *this_sub, *label;
     SymReg *regs[2];
-    Instruction *get_params, *tmp_ins;
+    Instruction *get_params, *tmp_ins, *unused_ins;
     char *buf;
 
     if (!(unit->instructions->type & ITLABEL))
@@ -614,11 +616,12 @@
 
     free(buf);
 
-    ins     = move_regs(interp, unit, ins, sub->pcc_sub->nargs,
+    ins = move_regs(interp, unit, ins, sub->pcc_sub->nargs,
             this_sub->pcc_sub->args, sub->pcc_sub->args);
 
     regs[0] = label;
-    insINS(interp, unit, ins, "branch", regs, 1);
+    unused_ins = insINS(interp, unit, ins, "branch", regs, 1);
+    UNUSED(unused_ins);
 
     return 1;
 }