Path: utzoo!yunexus!telly!ddsw1!mcdchg!rutgers!tut.cis.ohio-state.edu!ORION.CF.UCI.EDU!schmidt%blanche.ics.uci.edu
From: schmidt%blanche.ics.uci.edu@ORION.CF.UCI.EDU ("Douglas C. Schmidt")
Newsgroups: gnu.gcc.bug
Subject: Gcc 1.31 gets fatal signal on sparc
Message-ID: <8811231503.aa14226@PARIS.ICS.UCI.EDU>
Date: 23 Nov 88 23:03:30 GMT
Article-I.D.: PARIS.8811231503.aa14226
Sender: daemon@tut.cis.ohio-state.edu
Distribution: gnu
Organization: GNUs Not Usenet
Lines: 88


Bug Report for GCC:
-------------------
Problem :  The following program gets a fatal signal on the sparc when
	        compiled with the -finline-functions -fstrength-reduce -O
           options enabled

1.) Version : gcc 1.31
-----------

2.) Input Program :
-----------------


extern double drem();
struct sat {
    double a;			 
    double e;			 
    double pomega;
    double mu;			 
    double omega;		 
    double phi;
    double p0;			 
    double yr, yi;		 
    int n;			 
    int index;			 
    int current;		 
};
static double dt;
struct sat *nextpl(pl, nplanet, test)
struct sat *pl;
int nplanet;
struct sat test;
{
    struct sat *sptr, *encptr;
    double dtmin, dttry;
    double dphi;
    dtmin = 1.0 / 1.0e-12 ;
    encptr = 0 ;
    for(sptr = pl; sptr < pl + nplanet; sptr++) {
	if(sptr->current == 0) {  
	    if(test.a > sptr->a) {
		dphi = test.phi - sptr->phi;
	    } else {
		dphi = sptr->phi - test.phi;
	    }
	    dphi = drem(dphi, (2.0*3.14159265358979323846 ) );
	    if(dphi < 0.0) dphi = (2.0*3.14159265358979323846 )  + dphi;
	    if((dttry = dphi/({ double __value, __arg = (sptr->omega - test.omega); asm ("fpabsd %1, %0": "=xy" (__value): "xym" (__arg)); __value; }) ) < dtmin) {
		dtmin = dttry;
		encptr = sptr;
	    }
	}
    }
    for(sptr = pl; sptr < pl + nplanet; sptr++) {
	dphi = (2.0*3.14159265358979323846 ) ;
	if((dttry = dphi/({ double __value, __arg = (sptr->omega - test.omega); asm ("fpabsd %1, %0": "=xy" (__value): "xym" (__arg)); __value; }) ) < dtmin) {
	    dtmin = dttry;
	    encptr = sptr;
	}
    }
    dt = dtmin;
    return (encptr);
}

3.) Command Used : gcc -finline-functions -fstrength-reduce -O
----------------

4.) Files used :
--------------
		tm.h          -> tm-sparc.h
		md            -> sparc.md
      config.h      -> xm-sunos4.h
      aux-output.c  -> output-sparc.c
      
5.) Machine(s) used :
-------------------
   Sun 4 running Sun4.0

6.) Compiler diagnostics :
------------------------

gcc version 1.31
 /usr/public/lib/gcc/gcc-cpp -v -I/cd/ua/schmidt/include/ -undef -D__GNU__ -D__GNUC__ -Dsparc -Dsun -Dunix -D__OPTIMIZE__ q-bug-1.30.c /tmp/cca18644.cpp
GNU CPP version 1.31
 /usr/public/lib/gcc/gcc-cc1 /tmp/cca18644.cpp -quiet -dumpbase q-bug-1.30.c -finline-functions -finline-functions -fstrength-reduce -O -version -o /tmp/cca18644.s
/usr/public/gcc: Program cc1 got fatal signal 11.