# "a==b" should return true if the a and b are ILists with the same content and equal items

use System.Collections

class Test

	shared
		def main
			.testList
			.testDictionary

		def testList
			t as ArrayList = ArrayList()
			u as ArrayList = ArrayList()
			assert t==u
			t.add(5)
			assert t<>u
			u.add(5)
			assert t==u
			t.add('aoeu')
			u.add('aoeu')
			assert t==u
			t[t.count-1] = 'asdf'
			assert t<>u

		def testDictionary
			a as Hashtable = Hashtable()
			b as Hashtable = Hashtable()
			assert a==b
			a.add('a', 1)
			assert a<>b
			b.add('a', 1)
			assert a==b
			a['a'] = 2
			assert a<>b
			b['a'] = 2
			assert a==b