OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [go.test/] [test/] [fixedbugs/] [bug116.go] - Rev 700

Compare with Previous | Blame | View Log

// $G $D/$F.go && $L $F.$A && ./$A.out || echo BUG: bug116

// 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() {
        bad := false
        if (-5 >> 1) != -3 {
                println("-5>>1 =", -5>>1, "want -3")
                bad = true
        }
        if (-4 >> 1) != -2 {
                println("-4>>1 =", -4>>1, "want -2")
                bad = true
        }
        if (-3 >> 1) != -2 {
                println("-3>>1 =", -3>>1, "want -2")
                bad = true
        }
        if (-2 >> 1) != -1 {
                println("-2>>1 =", -2>>1, "want -1")
                bad = true
        }
        if (-1 >> 1) != -1 {
                println("-1>>1 =", -1>>1, "want -1")
                bad = true
        }
        if bad {
                println("errors")
                panic("fail")
        }
}

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.