PRO TEST_REPEAT
text = ''
count = 0
print, 'Enter text (done to quit)'
repeat begin
  read, text
  count = count + 1
endrep until (text eq 'done')
print, 'Number of lines entered: ', count - 1
END