Not satisfying the equality, but you can use polymorphism. Block >> , aBlock ^ BlockCompositor andAll: OrderedCollection with: self with: aBlock BlockCompositor >> #, aBlock conditions add: aBlock. BlockCompositor >> value: anObject ^ conditions allSatisfy: [:e | e value: anObject ] I don't really like the name BlockCompositor, but can't think of a better name at the moment. You could also implement logic for #or: using #+ and: #anySatisfy: for example, but need to safeguard against mixing both conditions. On Mon, 14 Mar 2022 at 22:29, Hernán Morales Durand < hernan.morales@gmail.com> wrote:
I think I saw a coding pattern a while ago that allows you to do the following:
cond1 , cond2 , cond3 , cond4
And providing a kind of folding selector condition #and: you would get:
[ cond1 and: [ cond2 and: [ cond3 and: [ cond4 ] ] ] ].
for example:
conditions := [ : each | each firstName = 'Boca' ] , [ : each | each lastName = 'Baret' ] , [ : each | each fullName = 'Virgasia' ].
such that the following assert is met:
self assert: conditions equals: [ : each | each firstName = 'Boca' and: [ each lastName = 'Baret' and: [ each fullName = 'Virgasia' ] ] ].
Any ideas or pointers?
Cheers,
Hernán