protoDesc :: DexFile -> Proto -> PP.Doc
protoDesc dex proto =
  M.mconcat [ "(", argStr, ")", retStr ]
  where argStr = M.mconcat $ map (getTypeName' dex) (protoParams proto)
        retStr = getTypeName' dex (protoRet proto)
protoDesc :: DexFile -> Proto -> PP.Doc
protoDesc dex proto =
  M.mconcat [ "(", argStr, ")", retStr ]
  where argStr = M.mconcat $ map (getTypeName' dex) (protoParams proto)
        retStr = getTypeName' dex (protoRet proto)
protoDesc dex proto =
  M.mconcat [ "(", argStr, ")", retStr ]
  where argStr = M.mconcat $ map (getTypeName' dex) (protoParams proto)
        retStr = getTypeName' dex (protoRet proto)