more strictness to Types.hs: UIState
This commit is contained in:
parent
74fc3af201
commit
e72e8c9333
@ -147,9 +147,9 @@ data GLState = GLState
|
|||||||
|
|
||||||
data UIState = UIState
|
data UIState = UIState
|
||||||
{ _uiHasChanged :: !Bool
|
{ _uiHasChanged :: !Bool
|
||||||
, _uiMap :: Map.HashMap UIId (GUIWidget Pioneers)
|
, _uiMap :: !(Map.HashMap UIId (GUIWidget Pioneers))
|
||||||
, _uiRoots :: [UIId]
|
, _uiRoots :: !([UIId])
|
||||||
, _uiButtonState :: UIButtonState
|
, _uiButtonState :: !UIButtonState
|
||||||
}
|
}
|
||||||
|
|
||||||
data State = State
|
data State = State
|
||||||
|
Loading…
Reference in New Issue
Block a user