prettyVisibleAnnotation :: DexFile -> VisibleAnnotation -> PP.Doc
prettyVisibleAnnotation dex va =
  PP.hcat [ "<" <> prettyAnnotationVisibility (vaVisibility va) <> ">"
          , " "
          , prettyAnnotation dex (vaAnnotation va)
          ]
prettyVisibleAnnotation :: DexFile -> VisibleAnnotation -> PP.Doc
prettyVisibleAnnotation dex va =
  PP.hcat [ "<" <> prettyAnnotationVisibility (vaVisibility va) <> ">"
          , " "
          , prettyAnnotation dex (vaAnnotation va)
          ]
prettyVisibleAnnotation dex va =
  PP.hcat [ "<" <> prettyAnnotationVisibility (vaVisibility va) <> ">"
          , " "
          , prettyAnnotation dex (vaAnnotation va)
          ]