Compiler/lexical analyzer: Difference between revisions

Content added Content deleted
Line 3,987: Line 3,987:
integer, private :: unget_count = 0
integer, private :: unget_count = 0


! The maximum lookahead is 2, for how we handle comments.
! The maximum lookahead is 2, although I believe we are using
! only 1. In principle, the lookahead could be any finite number.
character(1, kind = ck), private :: unget_buffer(1:2)
character(1, kind = ck), private :: unget_buffer(1:2)
logical, private :: unget_eof_buffer(1:2)
logical, private :: unget_eof_buffer(1:2)