20 lines
444 B
Smalltalk
20 lines
444 B
Smalltalk
TimerScheduler extend [
|
|
TimerScheduler class >> startUp [
|
|
Smalltalk at: #OsmoTimeScheduler ifPresent: [
|
|
OsmoTimeScheduler reinitialize.
|
|
].
|
|
]
|
|
|
|
platformInit [
|
|
<category: 'creation'>
|
|
"Pharo requires us to do some post-processing"
|
|
Smalltalk addToStartUpList: self class.
|
|
]
|
|
|
|
reinitialize [
|
|
<category: 'creation'>
|
|
loop terminate.
|
|
self startLoop.
|
|
]
|
|
]
|