fix test for REG_BaseReg (it's spelled REG_Base)
authorSimon Marlow <simonmar@microsoft.com>
Fri, 10 Feb 2006 12:35:52 +0000 (12:35 +0000)
committerSimon Marlow <simonmar@microsoft.com>
Fri, 10 Feb 2006 12:35:52 +0000 (12:35 +0000)
ghc/rts/Capability.c

index 24d9a63..a4380e7 100644 (file)
@@ -163,7 +163,7 @@ initCapabilities( void )
 #if defined(THREADED_RTS)
     nat i;
 
-#ifndef REG_BaseReg
+#ifndef REG_Base
     // We can't support multiple CPUs if BaseReg is not a register
     if (RtsFlags.ParFlags.nNodes > 1) {
        errorBelch("warning: multiple CPUs not supported in this build, reverting to 1");