+ expectMessage(t, &messages[0], at3, id3, say3)
+}
+
+func TestTypicalFlow(t *testing.T) {
+ id1 := "10"
+ id2 := "11"
+ say1 := "The Norwegian Blue prefers kippin' on it's back!"
+ say2 := "Remarkable bird, innit, squire? Lovely plumage!"
+ store := start_store()
+ defer func() {
+ close(store.Get)
+ close(store.Add)
+ }()
+
+ // A waiting zero-time fetch.
+ var zero_time time.Time
+ prev_fetch_wait_count := fetch_wait_count.String()
+ fetch1 := make(chan []Message, 1)
+ store.Get <- &StoreRequest{zero_time, fetch1}
+ for prev_fetch_wait_count == fetch_wait_count.String() {
+ runtime.Gosched()
+ }
+
+ // Someone speaks. This triggers delivery.
+ at1 := time.Now()
+ store.Add <- &Message{at1, id1, say1}
+ messages1 := <-fetch1
+ if len(messages1) != 1 {
+ t.FailNow()
+ }
+ expectMessage(t, &messages1[0], at1, id1, say1)
+
+ // Upon recipt, client blocks on fetch with since=at1
+ prev_fetch_wait_count = fetch_wait_count.String()
+ fetch2 := make(chan []Message, 1)
+ store.Get <- &StoreRequest{at1, fetch2}
+ for prev_fetch_wait_count == fetch_wait_count.String() {
+ runtime.Gosched()