From 745147f88f400cced478dd588a2dfd7a7c2140a8 Mon Sep 17 00:00:00 2001 From: Marvin Borner Date: Mon, 18 Jul 2022 01:44:38 +0200 Subject: Moved/improved standard library and other things --- 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 76a1f83..5c31aba 100644 --- a/src/Helper.hs +++ b/src/Helper.hs @@ -12,7 +12,7 @@ type Failable = Either Error data Expression = Bruijn Int | Variable String | Abstraction Expression | Application Expression Expression deriving (Ord, Eq) -data Instruction = Define String Expression | Evaluate Expression | Comment String | Import String | Test Expression Expression +data Instruction = Define String Expression | Evaluate Expression | Comment String | Import String String | Test Expression Expression deriving (Show) instance Show Expression where show (Bruijn x ) = "\ESC[31m" <> show x <> "\ESC[0m" -- cgit v1.2.3