Author: julianalbo
Date: Mon Jan 26 08:14:50 2009
New Revision: 36035
Modified:
trunk/compilers/imcc/reg_alloc.c
trunk/include/parrot/gc_api.h
trunk/src/pmc/exception.pmc
Log:
[cage] fix a few warnings
Modified: trunk/compilers/imcc/reg_alloc.c
==============================================================================
--- trunk/compilers/imcc/reg_alloc.c (original)
+++ trunk/compilers/imcc/reg_alloc.c Mon Jan 26 08:14:50 2009
@@ -366,7 +366,7 @@
do {
int first = 1;
do {
- while (pre_optimize(interp, unit));
+ while (pre_optimize(interp, unit)) { };
find_basic_blocks(interp, unit, first);
build_cfg(interp, unit);
Modified: trunk/include/parrot/gc_api.h
==============================================================================
--- trunk/include/parrot/gc_api.h (original)
+++ trunk/include/parrot/gc_api.h Mon Jan 26 08:14:50 2009
@@ -286,8 +286,8 @@
#endif
#if PARROT_GC_MS
-# define GC_WRITE_BARRIER(interp, agg, old, _new)
-# define GC_WRITE_BARRIER_KEY(interp, agg, old, old_key, _new, new_key)
+# define GC_WRITE_BARRIER(interp, agg, old, _new) do { } while (0)
+# define GC_WRITE_BARRIER_KEY(interp, agg, old, old_key, _new, new_key) do {
} while (0)
#endif
#if PARROT_GC_GMS
Modified: trunk/src/pmc/exception.pmc
==============================================================================
--- trunk/src/pmc/exception.pmc (original)
+++ trunk/src/pmc/exception.pmc Mon Jan 26 08:14:50 2009
@@ -127,7 +127,7 @@
PMC_data(SELF) = core_struct;
core_struct->severity = ishash
? VTABLE_get_integer_keyed_str(interp, values, severity)
- : EXCEPT_error;
+ : (INTVAL) EXCEPT_error;
core_struct->handled = 0;
core_struct->message = ishash
? VTABLE_get_string_keyed_str(interp, values, message)
