RegressionTests__CESequenceableCollectionExtensionTest.st
author Claus Gittinger <cg@exept.de>
Thu, 27 Jul 2017 15:15:40 +0200
changeset 1650 1c57e4ea22ce
parent 1447 2351db93aa5b
permissions -rw-r--r--
#DOCUMENTATION by cg class: RegressionTests::SoundexStringComparatorTest added: #test01_SomeCombinations #test02_WellKnownResults removed: #testSomeCombinations #testWellKnownResults

"{ Package: 'stx:goodies/regression' }"

"{ NameSpace: RegressionTests }"

TestCase subclass:#CESequenceableCollectionExtensionTest
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'tests-Regression-CollectionExtensions'
!


!CESequenceableCollectionExtensionTest methodsFor:'tests'!

testPairsSimilarityWith
	
	self assert: ('1234' pairsSimilarityWith: '2234') equals: (2/3).
	self assert: ('1234' pairsSimilarityWith: '123') equals: (4/5).
	self assert: ('1234' pairsSimilarityWith: '5678') equals: 0
! !

!CESequenceableCollectionExtensionTest class methodsFor:'documentation'!

version
    ^ '$Header$'
!

version_CVS
    ^ '$Header$'
! !