added new match.rb and tests

git-svn-id: http://biopieces.googlecode.com/svn/trunk@2051 74ccb610-7750-0410-82ae-013aeee3265d

diff --git a/code_ruby/test/maasha/align/test_match.rb b/code_ruby/test/maasha/align/test_match.rb
new file mode 100755 (executable)
index 0000000..79df7cd
--- /dev/null
+++ b/code_ruby/test/maasha/align/test_match.rb
@@ -0,0 +1,74 @@
+#!/usr/bin/env ruby
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+# Copyright (C) 2013 Martin A. Hansen.
+
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+# http://www.gnu.org/copyleft/gpl.html
+
+# >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
+
+# This software is part of the Biopieces framework (www.biopieces.org).
+
+# >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>><<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
+
+require 'test/unit'
+require 'maasha/align/match'
+require 'pp'
+
+class MatchTest < Test::Unit::TestCase
+  def setup
+    @match = Match.new(1, 1, 3)
+  end
+
+  def test_Match_q_end_returns_correctly
+    assert_equal(3, @match.q_end)
+  end
+
+  def test_Match_s_end_returns_correctly
+    assert_equal(3, @match.s_end)
+  end
+
+  def test_Match_to_s_returns_correctly
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0",     @match.to_s)
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0 tcg", @match.to_s("atcg"))
+  end
+
+  def test_Match_expand_to_left_end_returns_correctly
+    assert_equal("q: 0, s: 0, l: 4, s: 0.0", @match.expand("atcg", "atcg", 0, 0, 3, 3).to_s)
+  end
+
+  def test_Match_expand_to_left_mismatch_returns_correctly
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0", @match.expand("gtcg", "atcg", 0, 0, 3, 3).to_s)
+  end
+
+  def test_Match_expand_to_left_space_beg_returns_correctly
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0", @match.expand("atcg", "atcg", 1, 1, 3, 3).to_s)
+  end
+
+  def test_Match_expand_to_right_end_returns_correctly
+    assert_equal("q: 0, s: 0, l: 5, s: 0.0", @match.expand("atcga", "atcga", 0, 0, 4, 4).to_s)
+  end
+
+  def test_Match_expand_to_right_mismatch_returns_correctly
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0", @match.expand("gtcga", "atcgg", 0, 0, 4, 4).to_s)
+  end
+
+  def test_Match_expand_to_right_space_end_returns_correctly
+    assert_equal("q: 1, s: 1, l: 3, s: 0.0", @match.expand("atcga", "atcga", 1, 1, 3, 3).to_s)
+  end
+end
+