Author: coke
Date: Fri Feb 10 09:06:23 2006
New Revision: 11500
Modified:
trunk/compilers/imcc/optimizer.c
trunk/compilers/imcc/parser_util.c
trunk/compilers/imcc/pbc.c
trunk/src/objects.c
trunk/src/pic.c
trunk/src/pmc_freeze.c
trunk/src/trace.c
Log:
eliminiate compiler warnings (OS X gcc4.0). Mostly unitialized warnings, one
unused parameter.
Modified: trunk/compilers/imcc/optimizer.c
==============================================================================
--- trunk/compilers/imcc/optimizer.c (original)
+++ trunk/compilers/imcc/optimizer.c Fri Feb 10 09:06:23 2006
@@ -486,6 +486,8 @@ constant_propagation(Interp *interpreter
int any = 0;
int found;
+ o = c = NULL; /* silence compiler uninit warning */
+
IMCC_info(interpreter, 2, "\tconstant_propagation\n");
for (ins = unit->instructions; ins; ins = ins->next) {
found = 0;
Modified: trunk/compilers/imcc/parser_util.c
==============================================================================
--- trunk/compilers/imcc/parser_util.c (original)
+++ trunk/compilers/imcc/parser_util.c Fri Feb 10 09:06:23 2006
@@ -944,6 +944,8 @@ multi_keyed(Interp *interpreter, IMC_Uni
SymReg *nreg[3];
Instruction *ins = 0;
+ UNUSED(emit);
+
/* count keys in keyvec */
kv = keyvec;
for (i = keyf = 0; i < nr; i++, kv >>= 1)
Modified: trunk/compilers/imcc/pbc.c
==============================================================================
--- trunk/compilers/imcc/pbc.c (original)
+++ trunk/compilers/imcc/pbc.c Fri Feb 10 09:06:23 2006
@@ -1054,7 +1054,7 @@ verify_signature(Interp *interpreter, In
PMC *sig_arr = interpreter->code->const_table->constants[pc[-1]]->u.key;
INTVAL i, n, sig;
SymReg *r;
- int no_consts, needed;
+ int no_consts, needed=0;
PMC *changed_sig = NULL;
assert(PObj_is_PMC_TEST(sig_arr));
Modified: trunk/src/objects.c
==============================================================================
--- trunk/src/objects.c (original)
+++ trunk/src/objects.c Fri Feb 10 09:06:23 2006
@@ -736,6 +736,7 @@ class_mro_merge(Interp* interpreter, PMC
{
PMC *res, *seq, *cand, *nseqs, *s;
INTVAL i, j, k;
+ cand = NULL; /* silence compiler uninit warning */
res = pmc_new(interpreter, enum_class_ResizablePMCArray);
while (1) {
Modified: trunk/src/pic.c
==============================================================================
--- trunk/src/pic.c (original)
+++ trunk/src/pic.c Fri Feb 10 09:06:23 2006
@@ -378,6 +378,7 @@ int
parrot_pic_check_sig(Interp *interpreter, PMC *sig1, PMC *sig2, int *type)
{
int i, n, t0, t1, t2;
+ t0 = 0; /* silence compiler uninit warning */
ASSERT_SIG_PMC(sig1);
ASSERT_SIG_PMC(sig2);
Modified: trunk/src/pmc_freeze.c
==============================================================================
--- trunk/src/pmc_freeze.c (original)
+++ trunk/src/pmc_freeze.c Fri Feb 10 09:06:23 2006
@@ -937,7 +937,10 @@ do_thaw(Parrot_Interp interpreter, PMC*
UINTVAL id;
INTVAL type;
PMC ** pos;
- int must_have_seen = thaw_pmc(interpreter, info, &id, &type);
+ int must_have_seen;
+
+ type = 0; /* silence compiler uninit warning */
+ must_have_seen = thaw_pmc(interpreter, info, &id, &type);
id >>= 2;
Modified: trunk/src/trace.c
==============================================================================
--- trunk/src/trace.c (original)
+++ trunk/src/trace.c Fri Feb 10 09:06:23 2006
@@ -243,6 +243,8 @@ trace_op_dump(Interp *interpreter, opcod
PMC *sig;
int type;
+ sig = NULL; /* silence compiler uninit warning */
+
s = 1;
PIO_eprintf(interpreter, "%6vu ", (UINTVAL)(pc - code_start));
if (strcmp(info->name, "infix") == 0) {
