Read an input stream character by character. We allow for unlimited ungetting of characters just read.
We simplify the implementation greatly by reading the entire input into a buffer initially, and then simply traversing it using pointers.
We also have to allow for the here document diversion. This little gem comes about when the lexer encounters a here document. At this point we effectively need to split the input stream into two parts: one to read the body of the here document, the other to read the rest of the input line where the here document was initially encountered. For example, we might have
do_something(<<-A, <<-B) stuff for A stuff for B
When the lexer encounters the <<A, it reads until the end of the line, and keeps it around for later. It then reads the body of the here document. Once complete, it needs to read the rest of the original line, but then skip the here document body.
# File rdoc/parsers/parse_rb.rb, line 348 def initialize(content) if /\t/ =~ content tab_width = Options.instance.tab_width content = content.split(/\n/).map do |line| 1 while line.gsub!(/\t+/) { ' ' * (tab_width*$&.length - $`.length % tab_width)} && $~ #` line end .join("\n") end @content = content @content << "\n" unless @content[-1,1] == "\n" @size = @content.size @offset = 0 @hwm = 0 @line_num = 1 @read_back_offset = 0 @last_newline = 0 @newline_pending = false end
# File rdoc/parsers/parse_rb.rb, line 367 def column @offset - @last_newline end
# File rdoc/parsers/parse_rb.rb, line 421 def divert_read_from(reserve) @content[@offset, 0] = reserve @size = @content.size end
# File rdoc/parsers/parse_rb.rb, line 402 def get_read res = @content[@read_back_offset...@offset] @read_back_offset = @offset res end
# File rdoc/parsers/parse_rb.rb, line 371 def getc return nil if @offset >= @size ch = @content[@offset, 1] @offset += 1 @hwm = @offset if @hwm < @offset if @newline_pending @line_num += 1 @last_newline = @offset - 1 @newline_pending = false end if ch == "\n" @newline_pending = true end ch end
# File rdoc/parsers/parse_rb.rb, line 390 def getc_already_read getc end
# File rdoc/parsers/parse_rb.rb, line 408 def peek(at) pos = @offset + at if pos >= @size nil else @content[pos, 1] end end