testData/parser/r/Break.r (6 lines of code) (raw):

z <- 0 repeat { z <- z + 1 print(z) if(z > 100) break() }