showDefinitions :: CpdR.Definitions -> String
showDefinitions = intercalate "\n\n" . map go
  where
    go (gs, n, args) = printf "%s %s: %s" n (show args) (show gs)
showDefinitions :: CpdR.Definitions -> String
showDefinitions = intercalate "\n\n" . map go
  where
    go (gs, n, args) = printf "%s %s: %s" n (show args) (show gs)
showDefinitions = intercalate "\n\n" . map go
  where
    go (gs, n, args) = printf "%s %s: %s" n (show args) (show gs)