Subversion Repositories openrisc

// $G $D/$F.go && $L $F.$A && ./$A.out 2>&1 | cmp - $D/$F.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

func main() {

        var c string

        a := `abc`

        b := `xyz`

        /* print a literal */

        print(`abc`)

        /* print a variable */

        print(b, "-")

        /* catenate literals */

        print(`abc`+`xyz`, "-")

        /* catenate variables */

        print(a+b, "-")

        /* compare literals */

        if `abc` == `xyz` || `abc` != "abc" || `abc` > `xyz` {

                panic("compare literals")

        }

        /* compare variables */

        if a == b || a != a || a > b {

                panic("compare variables")

        }

        /* cat */

        c = a + b

        print(c, "-")

        /* catequal */

        c = a

        c += b

        print(c, "-")

        /* clumsy evaluation */

        c = b

        c = a + c

        print(c, "-")

        /* len */

        if len(c) != 6 {

                print("len ", len(c))

                panic("fail")

        }

        /* index strings */

        for i := 0; i < len(c); i = i + 1 {

                if c[i] != (a + b)[i] {

                        print("index ", i, " ", c[i], " ", (a + b)[i])

                        panic("fail")

                }

        }

        /* slice strings */

        print(c[0:3], c[3:])

        print("\n")

        /* create string with integer constant */

        c = string('x')

        if c != "x" {

                panic("create int " + c)

        }

        /* create string with integer variable */

        v := 'x'

        c = string(v)

        if c != "x" {

                panic("create int " + c)

        }

        /* create string with byte array */

        var z1 [3]byte

        z1[0] = 'a'

        z1[1] = 'b'

        z1[2] = 'c'

        c = string(z1[0:])

        if c != "abc" {

                panic("create byte array " + c)

        }

        /* create string with int array */

        var z2 [3]rune

        z2[0] = 'a'

        z2[1] = '\u1234'

        z2[2] = 'c'

        c = string(z2[0:])

        if c != "a\u1234c" {

                panic("create int array " + c)

        }

        /* create string with byte array pointer */

        z3 := new([3]byte)

        z3[0] = 'a'

        z3[1] = 'b'

        z3[2] = 'c'

        c = string(z3[0:])

        if c != "abc" {

                panic("create array pointer " + c)

        }

}