Subversion Repositories openrisc

// $G $D/$F.go && $L $F.$A && ./$A.out || echo BUG: bug159

// 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

import "os"

func main() {
        ok := true;
        var a, b, c, x, y, z int;
        f := func() int { b--; return -b };

        // this fails on 6g: apparently it rewrites
        // the list into
        //      z = f();
        //      y = f();
        //      x = f();
        // so that the values come out backward.
        x, y, z = f(), f(), f();
        if x != 1 || y != 2 || z != 3 {
                println("xyz: expected 1 2 3 got", x, y, z);
                ok = false;
        }

        // this fails on 6g too.  one of the function calls
        // happens after assigning to b.
        a, b, c = f(), f(), f();
        if a != 4 || b != 5 || c != 6 {
                println("abc: expected 4 5 6 got", a, b, c);
                ok = false;
        }

        if !ok {
                os.Exit(1);
        }
}