-- | Print the parts of a name to text.
printNameParts :: (String,String,String) -> Text
printNameParts (package,mod,ident) = T.pack $
  package <> ":" <> mod <> "." <> ident
printNameParts :: (String,String,String) -> Text
printNameParts (package,mod,ident) = T.pack $
  package <> ":" <> mod <> "." <> ident
printNameParts (package,mod,ident) = T.pack $
  package <> ":" <> mod <> "." <> ident