whichMessage := #( #'red' #'green' #'blue') at: computedIndex.
foo perform: whichMessage