diff -Nabur smalltalk-2.0.2/libgst/prims.inl smalltalk/libgst/prims.inl
--- smalltalk-2.0.2/libgst/prims.inl	Sat Jul  6 09:48:19 2002
+++ smalltalk/libgst/prims.inl	Sat Jul 13 20:56:11 2002
@@ -2681,9 +2681,9 @@
 		  			 volatile int numArgs,
 		  			 OOP methodOOP)
 {
+  gst_method_context context;
   _gst_primitives_executed++;
 
-  gst_method_context context;
   context = (gst_method_context) OOP_TO_OBJ (_gst_this_context_oop);
   context->flags |= MCF_IS_UNWIND_CONTEXT;
   if (send_block_value (numArgs))
diff -Nabur smalltalk-2.0.2/snprintfv/snprintfv/format.c smalltalk/snprintfv/snprintfv/format.c
--- smalltalk-2.0.2/snprintfv/snprintfv/format.c	Fri Jul  5 10:10:17 2002
+++ smalltalk/snprintfv/snprintfv/format.c	Sat Jul 13 20:31:04 2002
@@ -599,9 +599,9 @@
     /* Print the exponent now. */    
     if (!fixed_format)
     {
+        char x[10], *q = x;
         *p++ = exp_char;
 	base_exp--;
-	char x[10], *q = x;
 	if (base_exp < 0)
 	{
             *p++ = '-';