aboutsummaryrefslogtreecommitdiff
path: root/libgo/misc/cgo/stdio/testdata/fib.go
diff options
context:
space:
mode:
authorIan Lance Taylor <iant@golang.org>2019-09-06 18:12:46 +0000
committerIan Lance Taylor <ian@gcc.gnu.org>2019-09-06 18:12:46 +0000
commitaa8901e9bb0399d2c16f988ba2fe46eb0c0c5d13 (patch)
tree7e63b06d1eec92beec6997c9d3ab47a5d6a835be /libgo/misc/cgo/stdio/testdata/fib.go
parent920ea3b8ba3164b61ac9490dfdfceb6936eda6dd (diff)
downloadgcc-aa8901e9bb0399d2c16f988ba2fe46eb0c0c5d13.zip
gcc-aa8901e9bb0399d2c16f988ba2fe46eb0c0c5d13.tar.gz
gcc-aa8901e9bb0399d2c16f988ba2fe46eb0c0c5d13.tar.bz2
libgo: update to Go 1.13beta1 release
Reviewed-on: https://go-review.googlesource.com/c/gofrontend/+/193497 From-SVN: r275473
Diffstat (limited to 'libgo/misc/cgo/stdio/testdata/fib.go')
-rw-r--r--libgo/misc/cgo/stdio/testdata/fib.go52
1 files changed, 52 insertions, 0 deletions
diff --git a/libgo/misc/cgo/stdio/testdata/fib.go b/libgo/misc/cgo/stdio/testdata/fib.go
new file mode 100644
index 0000000..49cb0ea
--- /dev/null
+++ b/libgo/misc/cgo/stdio/testdata/fib.go
@@ -0,0 +1,52 @@
+// run -tags=use_go_run
+
+// 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.
+
+// +build test_run
+
+// Compute Fibonacci numbers with two goroutines
+// that pass integers back and forth. No actual
+// concurrency, just threads and synchronization
+// and foreign code on multiple pthreads.
+
+package main
+
+import (
+ "runtime"
+ "strconv"
+
+ "cgostdio/stdio"
+)
+
+func fibber(c, out chan int64, i int64) {
+ // Keep the fibbers in dedicated operating system
+ // threads, so that this program tests coordination
+ // between pthreads and not just goroutines.
+ runtime.LockOSThread()
+
+ if i == 0 {
+ c <- i
+ }
+ for {
+ j := <-c
+ stdio.Stdout.WriteString(strconv.FormatInt(j, 10) + "\n")
+ out <- j
+ <-out
+ i += j
+ c <- i
+ }
+}
+
+func main() {
+ c := make(chan int64)
+ out := make(chan int64)
+ go fibber(c, out, 0)
+ go fibber(c, out, 1)
+ <-out
+ for i := 0; i < 90; i++ {
+ out <- 1
+ <-out
+ }
+}