[project @ 2005-04-05 09:38:00 by simonmar]

[ghc-hetmet.git] / ghc / rts / Capability.h

diff --git a/ghc/rts/Capability.h b/ghc/rts/Capability.h
index eea28ef..b82ec09 100644 (file)
--- a/ghc/rts/Capability.h
+++ b/ghc/rts/Capability.h
@@ -23,10 +23,6 @@
 #ifndef __CAPABILITY_H__
 #define __CAPABILITY_H__
 
-#if !defined(SMP)
-extern Capability MainCapability;
-#endif
-
 // Initialised the available capabilities.
 //
 extern void initCapabilities( void );
@@ -35,6 +31,10 @@ extern void initCapabilities( void );
 //
 extern void releaseCapability( Capability* cap );
 
+// Signal that a thread has become runnable
+//
+extern void threadRunnable ( void );
+
 #ifdef RTS_SUPPORTS_THREADS
 // Gives up the current capability IFF there is a higher-priority
 // thread waiting for it.  This happens in one of two ways:
@@ -111,6 +111,6 @@ static inline rtsBool allFreeCapabilities (void)
 //
 extern void grabCapability( Capability **pCap );
 
-#endif // !RTS_SUPPORTS_THREADS
+#endif /* !RTS_SUPPORTS_THREADS */
 
 #endif /* __CAPABILITY_H__ */