URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [go.test/] [test/] [gc2.go] - Rev 700
Compare with Previous | Blame | View Log
// $G $D/$F.go && $L $F.$A && ./$A.out// Copyright 2011 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.// Check that buffered channels are garbage collected properly.// An interesting case because they have finalizers and used to// have self loops that kept them from being collected.// (Cyclic data with finalizers is never finalized, nor collected.)package mainimport ("fmt""os""runtime")func main() {const N = 10000st := new(runtime.MemStats)memstats := new(runtime.MemStats)runtime.ReadMemStats(st)for i := 0; i < N; i++ {c := make(chan int, 10)_ = cif i%100 == 0 {for j := 0; j < 4; j++ {runtime.GC()runtime.Gosched()runtime.GC()runtime.Gosched()}}}runtime.ReadMemStats(memstats)obj := memstats.HeapObjects - st.HeapObjectsif obj > N/5 {fmt.Println("too many objects left:", obj)os.Exit(1)}}
