diff options
| -rw-r--r-- | perl-install/c/smp.c | 20 |
1 files changed, 6 insertions, 14 deletions
diff --git a/perl-install/c/smp.c b/perl-install/c/smp.c index 3255ce9c4..baf786cc6 100644 --- a/perl-install/c/smp.c +++ b/perl-install/c/smp.c @@ -473,17 +473,6 @@ readEntry( void* entry, int size ) #endif /* __i386__ */ -static int sysconfDetectSMP(void) -{ - long nprocs; - - /* Error: assume we are *not* SMP. */ - if ((nprocs = sysconf(_SC_NPROCESSORS_ONLN)) < 0) - nprocs = 1; - - return nprocs > 1; -} - int detectSMP(void) { static int isSMP = -1; @@ -499,9 +488,12 @@ int detectSMP(void) return isSMP = alphaDetectSMP(); #elif __powerpc__ return isSMP = ppcDetectSMP(); -#elif defined(__ia64__) || defined(__x86_64__) - /* TODO: IA-64, maybe check against /proc/pal/cpuX ? */ - return isSMP = sysconfDetectSMP(); +#elif __ia64__ + /* TODO: Update to check against /proc/pal/cpuX */ + return isSMP = 1; +#elif __x86_64__ + /* TODO: Update when SMP machines are there */ + return isSMP = 0; #else #error unknown architecture #endif |