-- | Puts a 'Doc' in square brackets.
brackets :: Doc -> Doc
brackets = inside (char '[') (char ']')
brackets :: Doc -> Doc
brackets = inside (char '[') (char ']')
brackets = inside (char '[') (char ']')