nextline Function

private function nextline(this, tokenized_line, skip_empty) result(can_still_read)

Return if the next line can be read. It is written to the out-argument.

Note that it reads the next logical line, so if there are two lines connected by a line-continuation symbol, the two lines will be read.

If skip_empty is true, then lines that have no tokens are automatically skipped and the next logical line is tested. Note that empty lines includes lines that are not blank, but contain only comments.

Type Bound



Type IntentOptional Attributes Name
class(FileReader_t), intent(inout) :: this
type(TokenIterator_t), intent(out) :: tokenized_line
logical, intent(in) :: skip_empty

Return Value logical