[project @ 2005-03-28 22:03:33 by wolfgang]
[ghc-hetmet.git] / ghc / rts / Capability.h
index 450bf74..b82ec09 100644 (file)
@@ -31,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:
@@ -107,6 +111,6 @@ static inline rtsBool allFreeCapabilities (void)
 //
 extern void grabCapability( Capability **pCap );
 
-#endif // !RTS_SUPPORTS_THREADS
+#endif /* !RTS_SUPPORTS_THREADS */
 
 #endif /* __CAPABILITY_H__ */