Mercurial > projects > ldc
view tests/mini/sieve.d @ 659:43d2ab9833bf
Forgot a change from DMD update.
Removed old Phobos rebuild profiles.
Updated Tango rebuild profile slightly.
author | Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> |
---|---|
date | Mon, 06 Oct 2008 16:22:54 +0200 |
parents | 1bb99290e03a |
children |
line wrap: on
line source
/* Eratosthenes Sieve prime number calculation. */ extern(C) int printf(char*, ...); bool flags[8191]; int main() { int i, prime, k, count, iter; printf("10 iterations\n"); for (iter = 1; iter <= 10; iter++) { count = 0; flags[] = true; for (i = 0; i < flags.length; i++) { if (flags[i]) { prime = i + i + 3; k = i + prime; while (k < flags.length) { flags[k] = false; k += prime; } count += 1; } } } printf("%d primes\n", count); return 0; }