[netlabs #789] [PATCH] Squish some warnings

[via RT]

# New Ticket Created by  Simon Glover 
# Please include the string:  [netlabs #789]
# in the subject line of all future correspondence about this issue. 
# <URL: http://bugs6.perl.org/rt2/Ticket/Display.html?id=789 >



 stack_chunk is now Stack_Chunk...

 Simon

--- sub.c.old   Wed Jul 10 14:53:24 2002
+++ sub.c       Wed Jul 10 15:00:50 2002
@@ -34,8 +34,8 @@ new_sub(struct Parrot_Interp * interp, o
     /* Using system memory until I figure out GC issues */
     struct Parrot_Sub * newsub = mem_sys_allocate(sizeof(struct Parrot_Sub));
     newsub->init = address;
-    newsub->user_stack = (struct stack_chunk *)new_stack(interp);
-    newsub->control_stack = (struct stack_chunk *)new_stack(interp);
+    newsub->user_stack = (Stack_Chunk_t *)new_stack(interp);
+    newsub->control_stack = (Stack_Chunk_t *)new_stack(interp);
     newsub->lex_pad = NULL;
     return newsub;
 }
@@ -49,8 +49,8 @@ new_coroutine(struct Parrot_Interp * int
         mem_sys_allocate(sizeof(struct Parrot_Coroutine));
     newco->init = address;
     newco->resume = NULL;
-    newco->ctx.user_stack = (struct stack_chunk *)new_stack(interp);
-    newco->ctx.control_stack = (struct stack_chunk *)new_stack(interp);
+    newco->ctx.user_stack = (Stack_Chunk_t *)new_stack(interp);
+    newco->ctx.control_stack = (Stack_Chunk_t *)new_stack(interp);
     newco->lex_pad = NULL;
     return newco;
 }

--- include/parrot/sub.h.old    Wed Jul 10 14:53:33 2002
+++ include/parrot/sub.h        Wed Jul 10 14:54:06 2002
@@ -20,8 +20,8 @@

 typedef struct Parrot_Sub {
     INTVAL              flags;
-    struct stack_chunk  *user_stack;
-    struct stack_chunk  *control_stack;
+    struct Stack_Chunk  *user_stack;
+    struct Stack_Chunk  *control_stack;
     struct Scratchpad   *lex_pad;
     opcode_t            *init;
 } * parrot_sub_t;