From 99d8f364d6376886dd49a51ff4c3afe13337cfc4 Mon Sep 17 00:00:00 2001 From: Marvin Borner Date: Thu, 23 Feb 2023 14:59:34 +0100 Subject: Added time instruction --- src/Helper.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Helper.hs') diff --git a/src/Helper.hs b/src/Helper.hs index 98cdaea..97de641 100644 --- a/src/Helper.hs +++ b/src/Helper.hs @@ -138,7 +138,7 @@ instance Show Expression where show (Prefix p e) = show p <> " " <> show e data Command = Input String | Import String String | Test Expression Expression deriving (Show) -data Instruction = Define Identifier Expression [Instruction] | Evaluate Expression | Comment | Commands [Command] | ContextualInstruction Instruction String +data Instruction = Define Identifier Expression [Instruction] | Evaluate Expression | Time Expression | Comment | Commands [Command] | ContextualInstruction Instruction String deriving (Show) data EvalConf = EvalConf -- cgit v1.2.3