diff options
| author | Marvin Borner | 2023-02-23 15:55:33 +0100 |
|---|---|---|
| committer | Marvin Borner | 2023-02-23 15:55:33 +0100 |
| commit | 078734c1a310300c8121022103f1b4ca9bd1b5f2 (patch) | |
| tree | b7ab2cefb2261d4e79b6b2b4d86b5f9777682381 /src/Helper.hs | |
| parent | f452a6f311408ea78e5fce765766c98acca33188 (diff) | |
Added watch command
Diffstat (limited to 'src/Helper.hs')
| -rw-r--r-- | src/Helper.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Helper.hs b/src/Helper.hs index 6f17b15..a0a563a 100644 --- a/src/Helper.hs +++ b/src/Helper.hs @@ -136,7 +136,7 @@ instance Show Expression where show (MixfixChain ms) = "\ESC[33m(\ESC[0m" <> (intercalate " " $ map show ms) <> "\ESC[33m)\ESC[0m" show (Prefix p e) = show p <> " " <> show e -data Command = Input String | Import String String | Test Expression Expression | ClearState | Time Expression +data Command = Input String | Watch String | Import String String | Test Expression Expression | ClearState | Time Expression deriving (Show) data Instruction = Define Identifier Expression [Instruction] | Evaluate Expression | Comment | Commands [Command] | ContextualInstruction Instruction String deriving (Show) |