Subversion Repositories openrisc

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

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

type    Iputs   interface {
        puts    (s string) string;
}

// ---------

type    Print   struct {
        whoami  int;
        put     Iputs;
}

func (p *Print) dop() string {
        r := " print " + string(p.whoami + '0')
        return r + p.put.puts("abc");
}

// ---------

type    Bio     struct {
        whoami  int;
        put     Iputs;
}

func (b *Bio) puts(s string) string {
        r := " bio " + string(b.whoami + '0')
        return r + b.put.puts(s);
}

// ---------

type    File    struct {
        whoami  int;
        put     Iputs;
}

func (f *File) puts(s string) string {
        return " file " + string(f.whoami + '0') + " -- " + s
}

func
main() {
        p := new(Print);
        b := new(Bio);
        f := new(File);

        p.whoami = 1;
        p.put = b;

        b.whoami = 2;
        b.put = f;

        f.whoami = 3;

        r := p.dop();
        expected := " print 1 bio 2 file 3 -- abc"
        if r != expected {
                panic(r + " != " + expected)
        }
}