From 02bea100c07f3b122fc413b19b41b95236cd7be9 Mon Sep 17 00:00:00 2001
From: Ward Wouts <ward@wouts.nl>
Date: Wed, 9 Mar 2005 15:02:52 +0000
Subject: [PATCH] bunch of usefull tests

---
 trunk/ripnews/set/tests/test_intspan.rb | 86 +++++++++++++++++++++++++
 1 file changed, 86 insertions(+)
 create mode 100755 trunk/ripnews/set/tests/test_intspan.rb

diff --git a/trunk/ripnews/set/tests/test_intspan.rb b/trunk/ripnews/set/tests/test_intspan.rb
new file mode 100755
index 0000000..a323040
--- /dev/null
+++ b/trunk/ripnews/set/tests/test_intspan.rb
@@ -0,0 +1,86 @@
+#!/usr/local/bin/ruby
+
+# $Id$
+# $Source$
+
+require 'test/unit'
+require '../intspan'
+
+class TestSetIntspan < Test::Unit::TestCase
+	# def setup
+	# end
+
+	# def teardown
+	# end
+
+	def test_empty_set
+		set = Set::IntSpan.new()
+		assert(set.empty?)
+		assert_equal("", set.to_s)
+		set.set_neg_inf(true)
+		assert_equal(false, set.empty?)
+		set = Set::IntSpan.new()
+		set.set_pos_inf(true)
+		assert_equal(false, set.empty?)
+		set = Set::IntSpan.new("1")
+		assert_equal(false, set.empty?)
+	end
+
+	def test_neg_inf
+		set = Set::IntSpan.new()
+		set.set_neg_inf(true)
+		assert(set.neg_inf?)
+		set =  Set::IntSpan.new("(-1,3,5")
+		assert_equal(true, set.neg_inf?)
+		set = Set::IntSpan.new("1-3,5-)")
+		assert_equal(false, set.neg_inf?)
+		set = Set::IntSpan.new("(-1,3,5-)")
+		assert_equal(true, set.neg_inf?)
+	end
+
+	def test_pos_inf
+		set = Set::IntSpan.new()
+		set.set_pos_inf(true)
+		assert(set.pos_inf?)
+	end
+
+	def test_to_s
+		assert_equal("", Set::IntSpan.new().to_s)
+		assert_equal("1", Set::IntSpan.new("1").to_s)
+		assert_equal("1-3", Set::IntSpan.new("1-3").to_s)
+		assert_equal("1-3,5", Set::IntSpan.new("1-3,5").to_s)
+		assert_equal("(-1,3,5", Set::IntSpan.new("(-1,3,5").to_s)
+		assert_equal("1-3,5-)", Set::IntSpan.new("1-3,5-)").to_s)
+		assert_equal("(-1,3,5-)", Set::IntSpan.new("(-1,3,5-)").to_s)
+	end
+
+	def test_array_init
+		assert_equal("", Set::IntSpan.new([]).to_s)
+		assert_equal("1", Set::IntSpan.new([1]).to_s)
+		assert_equal("1-3", Set::IntSpan.new([1,2,3]).to_s)
+		assert_equal("1-3,5", Set::IntSpan.new([1,2,3,5]).to_s)
+	end
+
+	def test_set_init
+		set = Set::IntSpan.new("1-3,5")
+		set2 = Set::IntSpan.new(set)
+		assert_equal("1-3,5", set2.to_s)
+		set = Set::IntSpan.new("(-1,3,5-)")
+		set2 = Set::IntSpan.new(set)
+		assert_equal("(-1,3,5-)", set2.to_s)
+	end
+
+	def test_insert
+		set = Set::IntSpan.new()
+		assert_equal("", set.to_s)
+		set.insert(4)
+		assert_equal("4", set.to_s)
+		set.insert(5)
+		assert_equal("4-5", set.to_s)
+		set.insert(7)
+		assert_equal("4-5,7", set.to_s)
+		set.insert(6)
+		assert_equal("4-7", set.to_s)
+		set.set_neg_inf(true)
+	end
+end