Author: particle
Date: Mon Jan 9 08:00:17 2006
New Revision: 11017
Modified:
trunk/src/classes/exception_handler.pmc
trunk/src/disassemble.c
trunk/src/resources.c
Log:
src: remove compiler warnings
Modified: trunk/src/classes/exception_handler.pmc
==============================================================================
--- trunk/src/classes/exception_handler.pmc (original)
+++ trunk/src/classes/exception_handler.pmc Mon Jan 9 08:00:17 2006
@@ -119,13 +119,13 @@ Initializes the exception handler.
struct Parrot_cont * cc = PMC_cont(SELF);
PMC *exception = ex;
parrot_context_t *ex_ctx;
- void *next;
+ void *next = NULL;
opcode_t *results;
/* COMPAT: PMC *p5 = REG_PMC(5);*/
results = cc->current_results;
/* clear all results, so that continuation.invoke
- * doesn't pass any args
+ * doesn't pass any args #'
*/
cc->to_ctx->current_results = cc->current_results= NULL;
ex_ctx = CONTEXT(INTERP->ctx);
Modified: trunk/src/disassemble.c
==============================================================================
--- trunk/src/disassemble.c (original)
+++ trunk/src/disassemble.c Mon Jan 9 08:00:17 2006
@@ -41,7 +41,7 @@ int
main(int argc, char *argv[])
{
Parrot_Interp interpreter;
- char *filename, *disassemble;
+ char *filename;
Parrot_PackFile pf;
interpreter = Parrot_new(NULL);
Modified: trunk/src/resources.c
==============================================================================
--- trunk/src/resources.c (original)
+++ trunk/src/resources.c Mon Jan 9 08:00:17 2006
@@ -193,7 +193,6 @@ compact_pool(Interp *interpreter, struct
UINTVAL total_size;
struct Memory_Block *new_block; /* A pointer to our working block */
char *cur_spot; /* Where we're currently copying to */
- UINTVAL cur_size; /* How big our chunk is going to be */
struct Arenas *arena_base = interpreter->arena_base;
struct Small_Object_Arena *cur_buffer_arena;
struct Small_Object_Pool *header_pool;
