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] - Blame information for rev 700

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 700 jeremybenn
// $G $D/$F.go && $L $F.$A && ./$A.out || echo BUG: bug116
2
 
3
// Copyright 2009 The Go Authors. All rights reserved.
4
// Use of this source code is governed by a BSD-style
5
// license that can be found in the LICENSE file.
6
 
7
package main
8
 
9
func main() {
10
        bad := false
11
        if (-5 >> 1) != -3 {
12
                println("-5>>1 =", -5>>1, "want -3")
13
                bad = true
14
        }
15
        if (-4 >> 1) != -2 {
16
                println("-4>>1 =", -4>>1, "want -2")
17
                bad = true
18
        }
19
        if (-3 >> 1) != -2 {
20
                println("-3>>1 =", -3>>1, "want -2")
21
                bad = true
22
        }
23
        if (-2 >> 1) != -1 {
24
                println("-2>>1 =", -2>>1, "want -1")
25
                bad = true
26
        }
27
        if (-1 >> 1) != -1 {
28
                println("-1>>1 =", -1>>1, "want -1")
29
                bad = true
30
        }
31
        if bad {
32
                println("errors")
33
                panic("fail")
34
        }
35
}

powered by: WebSVN 2.1.0

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