Ticket #3915: panic.diff

File panic.diff, 719 bytes (added by bob, 5 years ago)

Uncomment "instance Default GuiState" block

  • State.hs

    diff -rN -u old-domination/State.hs new-domination/State.hs
    old new  
    172172                    , resetFirstFrame    = False
    173173                    }
    174174
    175 {-
    176 FIXME: This block causes GHC to panic and to claim that the impossible happens
    177175instance Default GuiState where
    178176    def = GuiState { g_font    = Nothing
    179177                   , g_labels  = []
    180178                   , g_actions = []
    181179                   }
    182 -}
    183 instance Default GuiState where
    184     def = undefined
    185180
    186181-- temporary data (can be used to set arbitrary next mode, etc.)
    187182data Tmp = TmpNul | TmpMode Mode | TmpString String