> a := Array with: 'free' with: 'reserved' with: 'free' with: 'reserved'.
> a2 := ((1 to: a size) inject: OrderedCollection new into: [ :oc :i | (a at:
> i) = 'free' ifTrue: [ oc add: i ]. oc ]) asArray.
How about
a2 := a select:[:i| i = 'free]
?

tim
--
Tim Rowledge, tim at sumeru.stanford.edu, http://sumeru.stanford.edu/tim
Microwave:  Signal from a friendly micro...