diff --git a/gcc/testsuite/gcc.c-torture/execute/920715-1.c b/gcc/testsuite/gcc.c-torture/execute/920715-1.c deleted file mode 100644 index 8b0f54b081c..00000000000 --- a/gcc/testsuite/gcc.c-torture/execute/920715-1.c +++ /dev/null @@ -1,67 +0,0 @@ -double ran(int *idum); -main () -{ - double vp = 0.0048; - double vx; - double vy; - double vz; - - /* CYGNUS LOCAL -- meissner/32bit doubles */ - /* This test requires double precision, so for hosts that don't offer - that much precision, just ignore this test. */ - if (sizeof (double) < 8) - exit (0); - /* END CYGNUS LOCAL -- meissner/32bit doubles */ - - maxbol(vp, &vx , &vy , &vz ); - if (vx < 0.001316505673 || vx > 0.001316505674) - abort(); - if (vy < 0.002731492112 || vy > 0.002731492113) - abort(); - if (vz < 0.001561454099 || vz > 0.001561454100) - abort(); - exit(0); -} -maxbol(double vp , double *vx , double *vy , double *vz) -{ - int idum=0; - int i; - double temp; - - *vx=vp*ran( &idum ); - *vy=vp*ran( &idum ); - *vz=vp*ran( &idum ); -} - -double ran(int *idum) -{ - static long ix1,ix2,ix3; - static double r[97]; - double temp; - static int iff=0; - int j; - - if(*idum<0 || iff==0){ - iff=1; - ix1=(54773-(*idum))%259200; - ix1=(7141*ix1+54773)%259200; - ix2=ix1 %134456; - ix1=(7141*ix1+54773)%259200; - ix3=ix1 %243000; - for(j=0; j<97; j++){ - ix1=(7141*ix1+54773)%259200; - ix2=(8121*ix2+28411)%134456; - r[j]=(ix1+ix2*(1.0/134456))*(1.0/259200); - } - *idum=1; - } - ix1=(7141*ix1+54773)%259200; - ix2=(8121*ix2+28411)%134456; - ix3=(4561*ix3+51349)%243000; - j=((97*ix3)/243000); - if(j >= 97 && j < 0) - abort(); - temp=r[j]; - r[j]=(ix1+ix2*(1.0/134456))*(1.0/259200); - return temp; -} diff --git a/gcc/testsuite/gcc.c-torture/execute/920715-1.x b/gcc/testsuite/gcc.c-torture/execute/920715-1.x deleted file mode 100644 index e6ecdff07d8..00000000000 --- a/gcc/testsuite/gcc.c-torture/execute/920715-1.x +++ /dev/null @@ -1,7 +0,0 @@ -# It doesn't work on d10v if doubles are not 64 bits - -if { [istarget "d10v-*-*"] && ! [string-match "*-mdouble64*" $CFLAGS] } { - set torture_execute_xfail "d10v-*-*" -} - -return 0 diff --git a/gcc/testsuite/gcc.c-torture/execute/980618-2.c b/gcc/testsuite/gcc.c-torture/execute/980618-2.c deleted file mode 100644 index c97e19e627f..00000000000 --- a/gcc/testsuite/gcc.c-torture/execute/980618-2.c +++ /dev/null @@ -1,66 +0,0 @@ -typedef char CHAR; -typedef short SHORT; -typedef int INT; -typedef long LONG; -typedef float FLOAT; -typedef unsigned char UCHAR; -typedef unsigned short USHORT; -typedef unsigned int UINT; -typedef unsigned long ULONG; -typedef double DOUBLE; -#if __STDC__ -typedef signed char SCHAR; -typedef long double LDOUBLE; -#endif - -int -main () -{ - typedef union - { - CHAR c; - SHORT s; - INT i; - UCHAR uc; - USHORT us; - UINT ui; - LONG l; - ULONG ul; - FLOAT f; - DOUBLE d; -#if __STDC__ - SCHAR sc; - LDOUBLE ld; -#endif - } - D; - auto D D1; - D1.c = 7; - { - auto struct - { - CHAR c; - SHORT s; - INT i; - UCHAR uc; - USHORT us; - UINT ui; - LONG l; - ULONG ul; - FLOAT f; - DOUBLE d; -#if __STDC__ - SCHAR sc; - LDOUBLE ld; -#endif - } - F; - F.c = 7; - if ((D1.c && F.c) != 1) - abort (); - if ((F.c && D1.c) != 1) - abort (); - } - - exit (0); -}