(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.misc-tests/
sieve.c
       1  
       2  #define TRUE 1
       3  #define FALSE 0
       4  #define SIZE 8190
       5  
       6  char flags[SIZE+1];
       7  
       8  main()
       9  {
      10  	register int i, prime, k, count, iter;
      11  	for (iter=1;iter<=100;iter++) 		{
      12  		count=0;
      13  		for (i=0;i<=SIZE;i++)
      14  			flags[i]=TRUE;
      15  		for (i=0;i<=SIZE;i++) {
      16  			if (flags[i]) {
      17  				prime=i+i+3;
      18  				for (k=i+prime;k<=SIZE;k+=prime)
      19  					flags[k]=FALSE;
      20  				count++;
      21  			}
      22  		}
      23  	}
      24  	return 0;
      25  }
      26