Loop strip-mining pass in LLVM

Does anyone know of any loop strip-mining passes implemented in LLVM?

You might check if Polly project has one.