12 Jun
2008
12 Jun
'08
10:16 p.m.
add: anElement | descriptionName group | self flag: 'broken'. descriptionName := anElement mooseDescription mmQualifiedName. group := byGroup at: descriptionName ifAbsentPut: [OrderedCollection new]. group add: anElement. elements add: anElement. ^anElement
I'm really sorry but I have the impression that we will not make it that way. The wrong person doing the wrong things.
stef