Add support for OverloadedLabels

`OverloadedLabels` is a simple enough extension to parse and format. It
is becoming more common with use of `generic-lens`. Since it can be
treated as a `HsVar` its implementation only requires using `docLit`,
along with some marshalling for dealing with `FastString`.

src-literatetests/14-extensions.blt

@@ -130,3 +130,13 @@ func = do
   hello
   |]
   pure True
+
+###############################################################################
+## OverloadedLabels
+#test bare label
+{-# LANGUAGE OverloadedLabels #-}
+foo = #bar
+
+#test applied and composed label
+{-# LANGUAGE OverloadedLabels #-}
+foo = #bar . #baz $ fmap #foo xs

src/Language/Haskell/Brittany/Internal/Layouters/Expr.hs

@@ -55,9 +55,9 @@ layoutExpr lexpr@(L _ expr) = do
     HsRecFld{} -> do
       -- TODO
       briDocByExactInlineOnly "HsRecFld" lexpr
-    HsOverLabel{} -> do
+    HsOverLabel NoExt _reboundFromLabel name ->
-      -- TODO
+      let label = FastString.unpackFS name
-      briDocByExactInlineOnly "HsOverLabel{}" lexpr
+      in docLit . Text.pack $ '#' : label
     HsIPVar{} -> do
       -- TODO
       briDocByExactInlineOnly "HsOverLabel{}" lexpr