+ store.Add <- &Message{at1, id1, say1}
+ store.Add <- &Message{at2, id2, say2}
+ store.Add <- &Message{at3, id3, say3}
+ for atoi(speak_count.String()) != start_speak_count+3 {
+ runtime.Gosched()
+ }
+ if atoi(drop_due_to_limit_count.String()) != start_drop_count+1 {
+ t.Fail()
+ }
+ messages_from_store := make(chan []Message, 1)
+ var zero_time time.Time
+ store.Get <- &StoreRequest{zero_time, messages_from_store}
+ messages := <-messages_from_store
+ if len(messages) != 2 {
+ t.FailNow()
+ }
+ expectMessage(t, &messages[0], at2, id2, say2)
+ expectMessage(t, &messages[1], at3, id3, say3)