#  _____         _
# |_   _|__  ___| |_
#   | |/ _ \/ __| __|
#   | |  __/\__ \ |_
#   |_|\___||___/\__|
#
# for lib/facets/core/string/nchar.rb
#
# Extracted Tue Jun 27 09:51:08 EDT 2006
# Unit Tools Reap Test Extractor
#

require 'facets/core/string/nchar.rb'


  require 'test/unit'

  class TCString < Test::Unit::TestCase

    def test_nchar
      assert_equal( "abc", "abcxyz".nchar(3) )
      assert_equal( "xyz", "abcxyz".nchar(-3) )
      assert_equal( "HIxyz", "abcxyz".nchar(3, 'HI') )
      assert_equal( "abcHI", "abcxyz".nchar(-3, 'HI') )
    end

  end