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 Element interface {

}

type Vector struct {

        elem []Element;

}

func (v *Vector) At(i int) Element {

        return v.elem[i];

}

type TStruct struct {

        name string;

        fields *Vector;

}

func (s *TStruct) field(i int) *TStruct {

        return s.fields.At(i).(*TStruct);

}

func main() {

        v := new(Vector);

        v.elem = make([]Element, 10);

        t := new(TStruct);

        t.name = "hi";

        v.elem[0] = t;

        s := new(TStruct);

        s.name = "foo";

        s.fields = v;

        if s.field(0).name != "hi" {

                panic("bad name")

        }

}