Simplify analyser terminal
This commit is contained in:
@@ -50,7 +50,6 @@ data TCom
|
||||
= TCInfo String String -- this may not be necessary, to revisit
|
||||
| TCBase
|
||||
| TCDamageCommand
|
||||
| TCSensorInfo
|
||||
|
||||
data TmWdWd
|
||||
= TmWdId
|
||||
|
||||
@@ -13,6 +13,7 @@ data TerminalStatus
|
||||
| TerminalLineRead
|
||||
| TerminalTextInput {_tiText :: String}
|
||||
| TerminalPressTo {_tptString :: String}
|
||||
| TerminalWaiting
|
||||
deriving (Eq,Show)
|
||||
|
||||
makeLenses ''TerminalStatus
|
||||
|
||||
Reference in New Issue
Block a user