Subversion Repositories openrisc

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

// Copyright 2010 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 a [12]complex128
var s []complex128
var c chan complex128
var f struct {
        c complex128
}
var m map[complex128]complex128

func main() {
        // array of complex128
        for i := 0; i < len(a); i++ {
                a[i] = complex(float64(i), float64(-i))
        }
        if a[5] != 5-5i {
                panic(a[5])
        }

        // slice of complex128
        s = make([]complex128, len(a))
        for i := 0; i < len(s); i++ {
                s[i] = a[i]
        }
        if s[5] != 5-5i {
                panic(s[5])
        }

        // chan
        c = make(chan complex128)
        go chantest(c)
        vc := <-c
        if vc != 5-5i {
                panic(vc)
        }

        // pointer of complex128
        v := a[5]
        pv := &v
        if *pv != 5-5i {
                panic(*pv)
        }

        // field of complex128
        f.c = a[5]
        if f.c != 5-5i {
                panic(f.c)
        }

        // map of complex128
        m = make(map[complex128]complex128)
        for i := 0; i < len(s); i++ {
                m[-a[i]] = a[i]
        }
        if m[5i-5] != 5-5i {
                panic(m[5i-5])
        }
        vm := m[complex(-5, 5)]
        if vm != 5-5i {
                panic(vm)
        }
}

func chantest(c chan complex128) { c <- a[5] }