local void GetRetInfo( void )
/***************************/
{
struct {
unsigned f_no8087 : 1;
unsigned f_list : 1;
unsigned f_struct : 1;
} have;
have.f_no8087 = 0;
have.f_list = 0;
have.f_struct = 0;
AuxInfo.cclass &= ~ NO_8087_RETURNS; /* 29-mar-90 */
AuxInfoFlg.f_8087_returns = 1;
for( ;; ) {
if( !have.f_no8087 && PragRecog( "no8087" ) ) {
have.f_no8087 = 1;
HW_CTurnOff( AuxInfo.returns, HW_FLTS );
AuxInfo.cclass |= NO_8087_RETURNS;
} else if( !have.f_list && PragRegSet() != T_NULL ) {
have.f_list = 1;
AuxInfo.cclass |= SPECIAL_RETURN;
AuxInfo.returns = PragRegList();
} else if( !have.f_struct && PragRecog( "struct" ) ) {
have.f_struct = 1;
GetSTRetInfo();
} else {
break;
}
}
}
static void GetRetInfo(
void )
{
struct {
unsigned f_no8087 : 1;
unsigned f_list : 1;
unsigned f_struct : 1;
} have;
have.f_no8087 = 0;
have.f_list = 0;
have.f_struct = 0;
CurrInfo->cclass &= ~ NO_8087_RETURNS;
for( ;; ) {
if( !have.f_no8087 && PragRecog( "no8087" ) ) {
have.f_no8087 = 1;
HW_CTurnOff( CurrInfo->returns, HW_FLTS );
CurrInfo->cclass |= NO_8087_RETURNS;
} else if( !have.f_list && IS_REGSET( CurToken ) ) {
have.f_list = 1;
CurrInfo->cclass |= SPECIAL_RETURN;
CurrInfo->returns = PragRegList();
} else if( !have.f_struct && PragRecog( "struct" ) ) {
have.f_struct = 1;
GetSTRetInfo();
} else {
break;
}
}
}
static void GetRetInfo( void )
/***************************/
{
struct {
bool f_no8087 : 1;
bool f_list : 1;
bool f_struct : 1;
} have;
have.f_no8087 = false;
have.f_list = false;
have.f_struct = false;
AuxInfo.cclass &= ~ NO_8087_RETURNS;
AuxInfoFlg.f_8087_returns = true;
for( ;; ) {
if( !have.f_no8087 && PragRecog( "no8087" ) ) {
have.f_no8087 = true;
HW_CTurnOff( AuxInfo.returns, HW_FLTS );
AuxInfo.cclass |= NO_8087_RETURNS;
} else if( !have.f_list && PragRegSet() != T_NULL ) {
have.f_list = true;
AuxInfo.cclass |= SPECIAL_RETURN;
AuxInfo.returns = PragRegList();
} else if( !have.f_struct && PragRecog( "struct" ) ) {
have.f_struct = true;
GetSTRetInfo();
} else {
break;
}
}
}
