Ticket #749: regex2.rb

require 'strscan'
require "test/unit"

class TestStringScanner < Test::Unit::TestCase
  def test_lookahead
    match = []
    ss = StringScanner.new($str)

    # while ss.skip_until(/class(?![^ \n])|def(?![^ \n])|end(?![^ \n])|if(?![^ \n])|then(?![^ \n])|else(?![^ \n])/)
    # while ss.skip_until(/(class|def|end|if|then|else)(?![^ \n])/)
    while ss.skip_until(/(class(?![^ \n])|def(?![^ \n]))/)
      a = ss.pos - ss.matched_size
      b = ss.matched_size

      warn "[#{a}, #{b}] = \"#{ss.matched}\""
      x = [a,b,ss.matched]
      match << x
    end

    assert_equal(match[0], [0, 5, "class"])
    assert_equal(match[1], [120, 3, "def"])
  end
  
end

$str = <<EOT
class PrintProxy
  # instance_methods.each {
  #   |m| undef_method m unless m =~ /(^__|^send$|^object_id$)/
  # }
  
  def initialize(obj, &block)
    @obj = obj
  end

  protected

  def method_missing(symbol, *args, &block)
    print "foo"
    if @block then print "foo\n" else print "\n" end
    
    @obj.send(symbol, *args, &block)
  end
end
EOT