From d071534cad3484f2864e9b3925aa434a3cd968a5 Mon Sep 17 00:00:00 2001
From: Evan Rutledge Borden <eborden@frontrowed.com>
Date: Sun, 23 Jun 2019 13:32:21 -0500
Subject: [PATCH] Remove NoExt

---
 src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs b/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
index 8a499f2..0d4c63d 100644
--- a/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
+++ b/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
@@ -55,7 +55,7 @@ layoutExpr lexpr@(L _ expr) = do
     HsRecFld{} -> do
       -- TODO
       briDocByExactInlineOnly "HsRecFld" lexpr
-    HsOverLabel NoExt _reboundFromLabel name ->
+    HsOverLabel _ext _reboundFromLabel name ->
       let label = FastString.unpackFS name
       in docLit . Text.pack $ '#' : label
     HsIPVar{} -> do