From 8a94288e5a1f00d4d9312ab6f143e0413bf814f4 Mon Sep 17 00:00:00 2001 From: crumbtoo Date: Thu, 8 Feb 2024 12:13:40 -0700 Subject: [PATCH] remove unnecessary comment --- src/Core/Syntax.hs | 9 --------- 1 file changed, 9 deletions(-) diff --git a/src/Core/Syntax.hs b/src/Core/Syntax.hs index ad8b67d..4bd3773 100644 --- a/src/Core/Syntax.hs +++ b/src/Core/Syntax.hs @@ -279,15 +279,6 @@ instance (Pretty b) => Pretty (Expr b) where "case" <+> pretty e <+> "of" $$ nest 2 (explicitLayout as) -{- - -x = pretty $ desugarRlpProg [rlpProg| - main = 3 - data B = T | F -|] - --} - instance (Pretty b) => Pretty (Alter b) where pretty (Alter c as e) = hsep [pretty c, hsep (pretty <$> as), "->", pretty e]