erbse 0.0.1 → 0.0.2

data/test/test-users-guide.rb

@@ -1,73 +0,0 @@
-###
-### $Release: 2.7.0 $
-### copyright(c) 2006-2011 kuwata-lab.com all rights reserved.
-###
-
-require  "#{File.dirname(__FILE__)}/test.rb"
-
-
-class KwarkUsersGuideTest < Test::Unit::TestCase
-
-  DIR = File.expand_path(File.dirname(__FILE__) + '/data/users-guide')
-  CWD = Dir.pwd()
-
-
-  def setup
-    Dir.chdir DIR
-  end
-
-
-  def teardown
-    Dir.chdir CWD
-  end
-
-
-  def _test
-    @name = (caller()[0] =~ /`(.*?)'/) && $1
-    s = File.read(@filename)
-    s =~ /\A\$ (.*?)\n/
-    command = $1
-    expected = $'
-    if ruby19?
-      case @name
-      when 'test_main_program1_result'
-        expected.sub!('["eruby", "items", "x", "_buf"]', '[:_buf, :eruby, :items, :x]')
-      when 'test_main_program2_result'
-        expected.sub!('["_context", "x", "_buf"]', '[:_buf, :x, :_context]')
-      end
-    elsif rubinius?
-      command.sub!(/^ruby\b/, 'rbx')
-      case @name
-      when 'test_main_program1_result'
-        expected.sub!('["eruby", "items", "x", "_buf"]', '["_buf", "eruby", "items", "x"]')
-      when 'test_main_program2_result'
-        expected.sub!('["_context", "x", "_buf"]', '["_buf", "x", "_context"]')
-      end
-    end
-    result = `#{command}`
-    assert_text_equal(expected, result)
-  end
-
-
-  Dir.chdir DIR do
-    filenames = []
-    filenames += Dir.glob('*.result')
-    filenames += Dir.glob('*.source')
-    filenames.each do |filename|
-      name = filename.gsub(/[^\w]/, '_')
-      s = <<-END
-        def test_#{name}
-          # $stderr.puts "*** debug: test_#{name}"
-          @name = '#{name}'
-          @filename = '#{filename}'
-          _test()
-        end
-      END
-      eval s
-    end
-  end
-
-
-  self.post_definition()
-
-end

data/test/test.rb

@@ -1,45 +0,0 @@
-##
-## $Release: 2.7.0 $
-## copyright(c) 2006-2011 kuwata-lab.com all rights reserved.
-##
-
-
-unless defined?(TESTDIR)
-  TESTDIR = File.dirname(__FILE__)
-  LIBDIR  = TESTDIR == '.' ? '../lib' : File.dirname(TESTDIR) + '/lib'
-  $: << TESTDIR
-  $: << LIBDIR
-end
-
-
-require 'test/unit'
-#require 'test/unit/ui/console/testrunner'
-require 'assert-text-equal'
-require 'yaml'
-require 'testutil'
-require 'erubis'
-
-
-Test::Unit::TestCase.class_eval do
-  if RUBY_VERSION >= "1.9"
-    ## minitest doesn't have 'name()' method
-    def name
-      @name || @__name__
-    end
-    def ruby19
-      yield
-    end
-  else
-    def ruby19
-    end
-  end
-end
-
-
-if $0 == __FILE__
-  require "#{TESTDIR}/test-erubis.rb"
-  require "#{TESTDIR}/test-engines.rb"
-  require "#{TESTDIR}/test-enhancers.rb"
-  require "#{TESTDIR}/test-main.rb"
-  require "#{TESTDIR}/test-users-guide.rb"
-end

data/test/testutil.rb

@@ -1,111 +0,0 @@
-###
-### $Release: 2.7.0 $
-### copyright(c) 2006-2011 kuwata-lab.com all rights reserved.
-###
-
-require 'yaml'
-
-require 'test/unit/testcase'
-
-
-
-def ruby18?  # :nodoc:
-  RUBY_VERSION =~ /\A1.8/
-end
-
-def ruby19?  # :nodoc:
-  RUBY_VERSION =~ /\A1.9/
-end
-
-def rubinius?  # :nodoc:
-  defined?(RUBY_ENGINE) && RUBY_ENGINE == "rbx"
-end
-
-
-
-class Test::Unit::TestCase
-
-
-  def self.load_yaml_datafile(filename, options={}, &block)  # :nodoc:
-    # read datafile
-    s = File.read(filename)
-    if filename =~ /\.rb$/
-      s =~ /^__END__$/   or raise "*** error: __END__ is not found in '#{filename}'."
-      s = $'
-    end
-    # untabify
-    s = _untabify(s) unless options[:tabify] == false
-    # load yaml document
-    testdata_list = []
-    YAML.load_documents(s) do |ydoc|
-      if ydoc.is_a?(Hash)
-        testdata_list << ydoc
-      elsif ydoc.is_a?(Array)
-        ydoc.each do |hash|
-          raise "testdata should be a mapping." unless hash.is_a?(Hash)
-          testdata_list << hash
-        end
-      else
-        raise "testdata should be a mapping."
-      end
-    end
-    # data check
-    identkey = options[:identkey] || 'name'
-    table = {}
-    testdata_list.each do |hash|
-      ident = hash[identkey]
-      ident          or  raise "*** key '#{identkey}' is required but not found."
-      table[ident]   and raise "*** #{identkey} '#{ident}' is duplicated."
-      table[ident] = hash
-      yield(hash) if block
-    end
-    #
-    return testdata_list
-  end
-
-
-  def self.define_testmethods(testdata_list, options={}, &block)
-    identkey   = options[:identkey]   || 'name'
-    testmethod = options[:testmethod] || '_test'
-    testdata_list.each do |hash|
-      yield(hash) if block
-      ident = hash[identkey]
-      s  =   "def test_#{ident}\n"
-      hash.each do |key, val|
-        s << "  @#{key} = #{val.inspect}\n"
-      end
-      s  <<  "  #{testmethod}\n"
-      s  <<  "end\n"
-      $stderr.puts "*** load_yaml_testdata(): eval_str=<<'END'\n#{s}END" if $DEBUG
-      self.module_eval s
-    end
-  end
-
-
-  def self.post_definition
-    if ENV['TEST']
-      target = "test_#{ENV['TEST']}"
-      self.instance_methods.each do |method_name|
-        m = method_name.to_s
-        private m if m =~ /\Atest_/ && m != target
-      end
-    end
-  end
-
-
-  def self._untabify(str, width=8)
-      return str if str.nil?
-      list = str.split(/\t/, -1)   # if 2nd arg is negative then split() doesn't remove tailing empty strings
-      last = list.pop
-      sb = ''
-      list.each do |s|
-        column = (n = s.rindex(?\n)) ? s.length - n - 1 : s.length
-        n = width - (column % width)
-        sb << s << (' ' * n)
-      end
-      sb << last if last
-      return sb
-  end
-
-
-end