Subversion Repositories openrisc

// $G $D/$F.go && $L $F.$A && ./$A.out

// Copyright 2009 The Go Authors. All rights reserved.
// Use of this source code is governed by a BSD-style
// license that can be found in the LICENSE file.

package main

var counter uint
var shift uint

func GetValue() uint {
        counter++
        return 1 << shift
}

func Send(a, b chan uint) int {
        var i int

LOOP:
        for {
                select {
                case a <- GetValue():
                        i++
                        a = nil
                case b <- GetValue():
                        i++
                        b = nil
                default:
                        break LOOP
                }
                shift++
        }
        return i
}

func main() {
        a := make(chan uint, 1)
        b := make(chan uint, 1)
        if v := Send(a, b); v != 2 {
                println("Send returned", v, "!= 2")
                panic("fail")
        }
        if av, bv := <-a, <-b; av|bv != 3 {
                println("bad values", av, bv)
                panic("fail")
        }
        if v := Send(a, nil); v != 1 {
                println("Send returned", v, "!= 1")
                panic("fail")
        }
        if counter != 10 {
                println("counter is", counter, "!= 10")
                panic("fail")
        }
}