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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [opt/] [pr36187.C] - Rev 693

Compare with Previous | Blame | View Log

/* { dg-do run } */
/* { dg-options "-O2" } */

extern "C" void abort (void);
enum SbxDataType { SbxINTEGER, SbxDECIMAL, SbxBYREF = 0x4000 };
struct SbxValues {
    union {
        float nSingle;
        float* pSingle;
    };
    SbxDataType eType;
};
static bool ImpPutDoubleFoo( SbxValues* p)
{
    bool bRet = false;
    SbxValues aTmp;
    int count = 0;
start: 
    switch( p->eType )  {  
        case SbxINTEGER:
            if (count++ > 0)
              abort ();
            aTmp.pSingle = &p->nSingle; goto direct;
        case SbxBYREF | SbxDECIMAL:
            bRet = false;
            break;
        direct:
            aTmp.eType = SbxDataType( p->eType | SbxBYREF );
            p = &aTmp; goto start;
        case SbxBYREF | SbxINTEGER:
            break;
        default:
            bRet =true;
    }
    return bRet;
}

int main( int argc, char** argv )
{
    SbxValues aTmp;
    aTmp.eType = SbxINTEGER;
    if ( ImpPutDoubleFoo( &aTmp ) )
        abort ();
    return 0;
}

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.