From 33aad1b8de0b8387426155870c98adf35e400962 Mon Sep 17 00:00:00 2001
From: Liyana <nliyanaam@smu.edu.sg>
Date: Tue, 10 Nov 2020 17:06:35 +0800
Subject: [PATCH] Deleted redundant pattern match

---
 src/compiler/GF/Grammar/Canonical.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/compiler/GF/Grammar/Canonical.hs b/src/compiler/GF/Grammar/Canonical.hs
index 4adff02f2..0df3236ff 100644
--- a/src/compiler/GF/Grammar/Canonical.hs
+++ b/src/compiler/GF/Grammar/Canonical.hs
@@ -265,7 +265,6 @@ instance PPA LinPattern where
       RecordPattern r -> block r
       TuplePattern ps -> "<"<>punctuate "," ps<>">"
       WildPattern     -> pp "_"                
-      _ -> parens p
 
 instance RhsSeparator LinPattern where rhsSep _ = pp "="