Index: include/parrot/debug.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/debug.h,v retrieving revision 1.16 diff -u -r1.16 debug.h --- include/parrot/debug.h 26 Aug 2002 17:27:43 -0000 1.16 +++ include/parrot/debug.h 9 Oct 2002 06:12:50 -0000 @@ -48,10 +48,10 @@ typedef struct PDB_condition *PDB_condition_ptr; typedef struct PDB_condition { - unsigned short type; - unsigned char reg; void *value; PDB_condition_ptr next; + unsigned short type; + unsigned char reg; } PDB_condition_t; /* PDB_label_t @@ -81,11 +81,11 @@ typedef struct PDB_line *PDB_line_ptr; typedef struct PDB_line { + PDB_line_ptr next; opcode_t *opcode; ptrdiff_t source_offset; unsigned long number; PDB_label_t *label; - PDB_line_ptr next; } PDB_line_t; /* PDB_file_t @@ -101,13 +101,13 @@ typedef struct PDB_file *PDB_file_ptr; typedef struct PDB_file { + PDB_file_ptr next; char *sourcefilename; char *source; size_t size; unsigned long list_line; PDB_line_t *line; PDB_label_t *label; - PDB_file_ptr next; } PDB_file_t; /* PDB_breakpoint_t @@ -120,10 +120,10 @@ typedef struct PDB_breakpoint *PDB_breakpoint_ptr; typedef struct PDB_breakpoint { + PDB_breakpoint_ptr next; opcode_t *pc; long skip; PDB_condition_t *condition; - PDB_breakpoint_ptr next; } PDB_breakpoint_t; /* PDB_t Index: include/parrot/hash.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/hash.h,v retrieving revision 1.9 diff -u -r1.9 hash.h --- include/parrot/hash.h 19 Aug 2002 23:15:52 -0000 1.9 +++ include/parrot/hash.h 9 Oct 2002 06:12:50 -0000 @@ -29,8 +29,8 @@ } HASH_ENTRY_TYPE; typedef struct _hash_entry { - HASH_ENTRY_TYPE type; UnionVal val; + HASH_ENTRY_TYPE type; } HASH_ENTRY; void new_hash(Interp * interpreter, HASH **hash_ptr); Index: include/parrot/interpreter.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/interpreter.h,v retrieving revision 1.53 diff -u -r1.53 interpreter.h --- include/parrot/interpreter.h 23 Aug 2002 07:55:22 -0000 1.53 +++ include/parrot/interpreter.h 9 Oct 2002 06:12:51 -0000 @@ -69,8 +69,8 @@ #endif typedef struct ProfData { - UINTVAL numcalls; FLOATVAL time; + UINTVAL numcalls; } ProfData; typedef struct Parrot_Context { Index: include/parrot/jit.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/jit.h,v retrieving revision 1.19 diff -u -r1.19 jit.h --- include/parrot/jit.h 13 Aug 2002 18:01:06 -0000 1.19 +++ include/parrot/jit.h 9 Oct 2002 06:12:51 -0000 @@ -24,15 +24,15 @@ typedef struct Parrot_jit_fixup *Parrot_jit_fixup_ptr; typedef struct Parrot_jit_fixup { - int type; - ptrdiff_t native_offset; - char skip; union { opcode_t opcode; void (*fptr)(void); } param; - Parrot_jit_fixup_ptr next; + int type; + ptrdiff_t native_offset; + char skip; + } Parrot_jit_fixup_t; /* Parrot_jit_opmap_t @@ -106,25 +106,25 @@ typedef struct Parrot_jit_optimizer_section *Parrot_jit_optimizer_section_ptr; typedef struct Parrot_jit_optimizer_section { + Parrot_jit_arena_t *arena; opcode_t *begin; opcode_t *end; Parrot_jit_register_count_t int_reg_count[NUM_REGISTERS]; Parrot_jit_register_usage_t int_reg_usage[NUM_REGISTERS]; Parrot_jit_register_dir_t int_reg_dir[NUM_REGISTERS]; - unsigned char int_registers_used; Parrot_jit_register_count_t float_reg_count[NUM_REGISTERS]; Parrot_jit_register_usage_t float_reg_usage[NUM_REGISTERS]; Parrot_jit_register_dir_t float_reg_dir[NUM_REGISTERS]; - unsigned char float_registers_used; - Parrot_jit_arena_t *arena; unsigned int maps; unsigned int jit_op_count; unsigned int op_count; ptrdiff_t load_size; - char type; Parrot_jit_optimizer_section_ptr branch_target; Parrot_jit_optimizer_section_ptr prev; Parrot_jit_optimizer_section_ptr next; + unsigned char int_registers_used; + unsigned char float_registers_used; + char type; } Parrot_jit_optimizer_section_t; /* Parrot_jit_optimizer_section_t @@ -174,11 +174,11 @@ */ typedef struct { + Parrot_jit_arena_t arena; opcode_t *prev_op; opcode_t *cur_op; opcode_t op_i; char *native_ptr; - Parrot_jit_arena_t arena; Parrot_jit_optimizer_t *optimizer; Parrot_jit_constant_pool_t *constant_pool; char *intval_map; Index: include/parrot/pmc.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/pmc.h,v retrieving revision 1.39 diff -u -r1.39 pmc.h --- include/parrot/pmc.h 5 Sep 2002 18:00:07 -0000 1.39 +++ include/parrot/pmc.h 9 Oct 2002 06:12:52 -0000 @@ -19,15 +19,16 @@ VAR_SCOPE PMC *Parrot_base_classname_hash; struct PMC { - VTABLE *vtable; - INTVAL flags; - DPOINTER *data; - /* cache.* is intended to just be *shortcuts* to*/ /* commonly-accessed data, *not* pointers to */ /* completely different data. That's why it's */ /* referred to as a "cache". */ UnionVal cache; + + VTABLE *vtable; + INTVAL flags; + DPOINTER *data; + SYNC *synchronize; /* This flag determines the next PMC in the 'used' list during Index: include/parrot/sub.h =================================================================== RCS file: /cvs/public/parrot/include/parrot/sub.h,v retrieving revision 1.8 diff -u -r1.8 sub.h --- include/parrot/sub.h 22 Aug 2002 14:24:39 -0000 1.8 +++ include/parrot/sub.h 9 Oct 2002 06:12:52 -0000 @@ -25,8 +25,8 @@ } * parrot_sub_t; typedef struct Parrot_Coroutine { - INTVAL flags; struct Parrot_Context ctx; + INTVAL flags; struct Scratchpad *lex_pad; opcode_t *init; opcode_t *resume;