(while:prn:abs:read)