From 1b02393a9df1702cb9c6c9267943a2f2bb99f7d6 Mon Sep 17 00:00:00 2001
From: Evan Rutledge Borden <eborden@frontrowed.com>
Date: Sun, 23 Jun 2019 14:27:58 -0500
Subject: [PATCH] Support version 8.0 of OverloadedLabels

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

diff --git a/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs b/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
index 2d9ec67..c1c0e5a 100644
--- a/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
+++ b/src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs
@@ -57,8 +57,10 @@ layoutExpr lexpr@(L _ expr) = do
       briDocByExactInlineOnly "HsRecFld" lexpr
 #if MIN_VERSION_ghc(8,6,0)   /* ghc-8.6 */
     HsOverLabel _ext _reboundFromLabel name ->
-#else
+#elif MIN_VERSION_ghc(8,2,0)   /* ghc-8.2 */
     HsOverLabel _reboundFromLabel name ->
+#else
+    HsOverLabel name ->
 #endif
       let label = FastString.unpackFS name
       in docLit . Text.pack $ '#' : label