Subversion Repositories openrisc

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

// Test that structures pack densely, according to the alignment of the largest field.

package main

import (

        "fmt"

        "os"

        "strconv"

)

type T1 struct {

        x uint8

}

type T2 struct {

        x uint16

}

type T4 struct {

        x uint32

}

func main() {

        report := len(os.Args) > 1

        status := 0

        var b1 [10]T1

        a0, _ := strconv.ParseUint(fmt.Sprintf("%p", &b1[0])[2:], 16, 64)

        a1, _ := strconv.ParseUint(fmt.Sprintf("%p", &b1[1])[2:], 16, 64)

        if a1 != a0+1 {

                fmt.Println("FAIL")

                if report {

                        fmt.Println("alignment should be 1, is", a1-a0)

                }

                status = 1

        }

        var b2 [10]T2

        a0, _ = strconv.ParseUint(fmt.Sprintf("%p", &b2[0])[2:], 16, 64)

        a1, _ = strconv.ParseUint(fmt.Sprintf("%p", &b2[1])[2:], 16, 64)

        if a1 != a0+2 {

                if status == 0 {

                        fmt.Println("FAIL")

                        status = 1

                }

                if report {

                        fmt.Println("alignment should be 2, is", a1-a0)

                }

        }

        var b4 [10]T4

        a0, _ = strconv.ParseUint(fmt.Sprintf("%p", &b4[0])[2:], 16, 64)

        a1, _ = strconv.ParseUint(fmt.Sprintf("%p", &b4[1])[2:], 16, 64)

        if a1 != a0+4 {

                if status == 0 {

                        fmt.Println("FAIL")

                        status = 1

                }

                if report {

                        fmt.Println("alignment should be 4, is", a1-a0)

                }

        }

        os.Exit(status)

}