ProcessorScheduler.st
changeset 4879 a4fc6ad599f6
parent 4715 b5735d3b752f
child 5101 901c91d6dd50
equal deleted inserted replaced
4878:1a64a89d6c01 4879:a4fc6ad599f6
   836     currentPriority := SchedulingPriority.
   836     currentPriority := SchedulingPriority.
   837     p := Process basicNew.
   837     p := Process basicNew.
   838     p setId:0 state:#run.
   838     p setId:0 state:#run.
   839     p setPriority:currentPriority.
   839     p setPriority:currentPriority.
   840     p name:'scheduler'.
   840     p name:'scheduler'.
       
   841     p beSystemProcess.
   841 
   842 
   842     scheduler := activeProcess := p.
   843     scheduler := activeProcess := p.
   843     activeProcessId := 0.
   844     activeProcessId := 0.
   844 
   845 
   845     quiescentProcessLists at:currentPriority put:(l := LinkedList new).
   846     quiescentProcessLists at:currentPriority put:(l := LinkedList new).
  3007 ! !
  3008 ! !
  3008 
  3009 
  3009 !ProcessorScheduler class methodsFor:'documentation'!
  3010 !ProcessorScheduler class methodsFor:'documentation'!
  3010 
  3011 
  3011 version
  3012 version
  3012     ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.179 1999-09-10 12:58:56 cg Exp $'
  3013     ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.180 1999-10-08 09:03:21 ca Exp $'
  3013 ! !
  3014 ! !
  3014 ProcessorScheduler initialize!
  3015 ProcessorScheduler initialize!