cvsuser 03/11/22 04:13:49
Modified: imcc instructions.c pcc.c
Log:
warning patrol fixes courtesy of Juergen Boemmels
Revision Changes Path
1.52 +3 -2 parrot/imcc/instructions.c
Index: instructions.c
===================================================================
RCS file: /cvs/public/parrot/imcc/instructions.c,v
retrieving revision 1.51
retrieving revision 1.52
diff -u -w -r1.51 -r1.52
--- instructions.c 19 Nov 2003 07:26:22 -0000 1.51
+++ instructions.c 22 Nov 2003 12:13:49 -0000 1.52
@@ -36,7 +36,7 @@
Emitter emitters[2] = {
{e_file_open,
e_file_emit,
- (int (*)(void *))NULLfunc,
+ (int (*)(void *, IMC_Unit *))NULLfunc,
e_file_close},
{e_pbc_open,
@@ -471,6 +471,7 @@
e_file_emit(void *param, IMC_Unit * unit, Instruction * ins)
{
UNUSED(param);
+ UNUSED(unit);
#if IMC_TRACE
PIO_eprintf(NULL, "e_file_emit\n");
#endif
@@ -498,7 +499,7 @@
int
emit_flush(void *param, IMC_Unit * unit)
{
- Instruction * ins, *next;
+ Instruction * ins;
struct Parrot_Interp *interpreter = (struct Parrot_Interp *)param;
#if IMC_TRACE
fprintf(stderr, "instructions.c: emit_flush\n");
1.35 +2 -0 parrot/imcc/pcc.c
Index: pcc.c
===================================================================
RCS file: /cvs/public/parrot/imcc/pcc.c,v
retrieving revision 1.34
retrieving revision 1.35
diff -u -w -r1.34 -r1.35
--- pcc.c 19 Nov 2003 07:29:40 -0000 1.34
+++ pcc.c 22 Nov 2003 12:13:49 -0000 1.35
@@ -532,6 +532,8 @@
int call_found, ret_found;
int i, j, matching;
struct pcc_sub_t *call, *ret;
+
+ UNUSED(unit);
/*
* currently only with -Oc
*/
