From ac8aa01a4854f1d52fd59a80793651e2eee5a1f0 Mon Sep 17 00:00:00 2001
From: Kevin Tew <tewk@racket-lang.org>
Date: Mon, 26 Apr 2010 14:25:39 -0600
Subject: [PATCH] GC - add sanity check default case

---
 src/racket/gc2/newgc.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/racket/gc2/newgc.c b/src/racket/gc2/newgc.c
index dee0bd431a..0474d6f747 100644
--- a/src/racket/gc2/newgc.c
+++ b/src/racket/gc2/newgc.c
@@ -3280,6 +3280,10 @@ static void repair_heap(NewGC *gc)
               break;
             case PAGE_ATOMIC:
               start += info->size;
+              break;
+            default:
+              printf("Unhandled info->type %i\n", info->type);
+              abort();
             }
             info->mark = 0;
 #ifdef MZ_USE_PLACES