fix some middle-of-C-block variable declrations

diff --git a/mark_rts.c b/mark_rts.c
index f426799c1b72f26e9d18feb5bdc8b32c0d6ae8de..cf05b27aa3f91bcf383fce6d8f8d86e448337049 100644 (file)
--- a/mark_rts.c
+++ b/mark_rts.c
@@ -369,8 +369,10 @@ ptr_t GC_approx_sp(void)
 #   ifdef _MSC_VER
 #     pragma warning(disable:4172)
 #   endif
-    ptr_t addr = ((ptr_t)(&dummy));
-    return addr;
+    {
+      ptr_t addr = ((ptr_t)(&dummy));
+      return addr;
+    }
 #   ifdef _MSC_VER
 #     pragma warning(default:4172)
 #   endif

diff --git a/new_hblk.c b/new_hblk.c
index dd188550320693184d5abcf4f701f462cafc2546..7e058d9306625447988a62b9234cf474ce2cd1fd 100644 (file)
--- a/new_hblk.c
+++ b/new_hblk.c
@@ -164,8 +164,10 @@ ptr_t GC_build_fl(struct hblk *h, size_t sz, GC_bool clear, ptr_t list)
    * put p (which is now head of list of objects in *h) as first
    * pointer in the appropriate free list for this size.
    */
-  word *tmp = (word *)h->hb_body;
-  obj_link(tmp) = list;
+  {
+    word *tmp = (word *)h->hb_body;
+    obj_link(tmp) = list;
+  }
   return ((ptr_t)p);
 }