obtained gcc-4.6.4.tar.bz2 from upstream website;upstream

verified gcc-4.6.4.tar.bz2.sig;
imported gcc-4.6.4 source tree from verified upstream tarball.

downloading a git-generated archive based on the 'upstream' tag
should provide you with a source tree that is binary identical
to the one extracted from the above tarball.

if you have obtained the source via the command 'git clone',
however, do note that line-endings of files in your working
directory might differ from line-endings of the respective
files in the upstream repository.

1 files changed, 39 insertions, 0 deletions

diff --git a/gcc/testsuite/go.test/test/fixedbugs/bug159.go b/gcc/testsuite/go.test/test/fixedbugs/bug159.go
new file mode 100644
index 000000000..1aa64433a
--- /dev/null
+++ b/gcc/testsuite/go.test/test/fixedbugs/bug159.go
@@ -0,0 +1,39 @@
+// $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);
+	}
+}