--- a/ProcessorScheduler.st	Wed May 17 11:13:21 2000 +0200
+++ b/ProcessorScheduler.st	Thu May 18 09:18:06 2000 +0200
@@ -1569,6 +1569,10 @@
     "Modified: 12.2.1997 / 12:41:49 / cg"
 !
 
+isDispatching
+    ^ dispatching
+!
+
 isPureEventDriven
     "this is temporary - (maybe not :-).
      you can run ST/X either with or without processes.
@@ -3105,6 +3109,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.183 1999-12-14 22:58:40 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.184 2000-05-18 07:18:06 ca Exp $'
 ! !
 ProcessorScheduler initialize!