cketti

If you are annoyed that "Sources for Android 26" are not yet available via SDK manager, this might be for you:

1. Collect source files

mkdir android-sdk-source-build
cd android-sdk-source-build

mkdir -p frameworks/base

kexoth

import System.Directory
import Control.Monad (filterM, mapM, liftM)
import System.FilePath ((</>))

getDirsRec :: FilePath -> IO [FilePath]
getDirsRec d = do
    dirContents <- getDirectoryContents d
    let dirContents' = [ d </> x | x <- dirContents, x /= ".", x /= ".." ]
    dirs' <- mapM dirRec dirContents'
    return (concat dirs' ++ [d])