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"