restructured GUI widgets' data representation from class type/instance-based

to function-based advantage: single constructor for any widget type, no branching necessary
2014-05-02 01:28:40 +02:00
parent f35f3895f5
commit ca51c23650
5 changed files with 308 additions and 347 deletions
--- a/src/Types.hs
+++ b/src/Types.hs
@ -135,7 +135,7 @@ data GLState = GLState

 data UIState = UIState
    { _uiHasChanged        :: !Bool
-    , _uiMap               :: Map.HashMap UIId (GUIAny Pioneers)
+    , _uiMap               :: Map.HashMap UIId (GUIWidget Pioneers)
    , _uiRoots             :: [UIId]
    }