From ac2ad0c7607bd361d998a47bda453d112eb7c641 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Erik=20Sved=C3=A4ng?= Date: Mon, 11 May 2020 13:31:00 +0200 Subject: [PATCH] =?UTF-8?q?Will=20emit=20Fn=20instead=20of=20=CE=BB=20on?= =?UTF-8?q?=20all=20platforms.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/Types.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Types.hs b/src/Types.hs index 929faa43..03f99a0f 100644 --- a/src/Types.hs +++ b/src/Types.hs @@ -84,7 +84,7 @@ data SumTyCase = SumTyCase { caseName :: String fnOrLambda = case platform of Windows -> "Fn" - _ -> "λ" + _ -> "Fn" -- "λ" instance Show Ty where show IntTy = "Int"