diff -rN -u old-domination/State.hs new-domination/State.hs
--- old-domination/State.hs	2010-03-08 01:09:21.796749693 +0000
+++ new-domination/State.hs	2010-03-08 01:09:21.810082762 +0000
@@ -172,16 +172,11 @@
                     , resetFirstFrame    = False
                     }
 
-{-
-FIXME: This block causes GHC to panic and to claim that the impossible happens
 instance Default GuiState where
     def = GuiState { g_font    = Nothing
                    , g_labels  = []
                    , g_actions = []
                    }
--}
-instance Default GuiState where
-    def = undefined
 
 -- temporary data (can be used to set arbitrary next mode, etc.)
 data Tmp = TmpNul | TmpMode Mode | TmpString String