Eliot Miranda uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-eem.329.mcz==================== Summary ====================
Name: KernelTests-eem.329
Author: eem
Time: 31 May 2017, 10:43:19.068997 am
UUID: 62f89132-ccc4-4461-8c04-596678fe9686
Ancestors: KernelTests-ul.328
Kernel tests harvested from Terf.
=============== Diff against KernelTests-ul.328 ===============
Item was added:
+ ----- Method: NumberParsingTest>>testFloatReadWithImplicitLeadingZero (in category 'tests - Float') -----
+ testFloatReadWithImplicitLeadingZero
+ "Test support for implicit leading zeroes when reading numbers from Strings."
+ self should: [-0.22 = '-.22' asNumber].
+ self should: [0.22 = '.22' asNumber].
+ !
Item was added:
+ ----- Method: SemaphoreTest>>testSemaAfterCriticalWait (in category 'testing') -----
+ testSemaAfterCriticalWait "self run: #testSemaAfterCriticalWait"
+ "This tests whether a semaphore that has just left the wait in Semaphore>>critical:
+ leaves it with signaling the associated semaphore."
+ | s p |
+ s := Semaphore new.
+ p := [s critical:[]] forkAt: Processor activePriority-1.
+ "wait until p entered the critical section"
+ [p suspendingList == s] whileFalse:[(Delay forMilliseconds: 10) wait].
+ "Now that p entered it, signal the semaphore. p now 'owns' the semaphore
+ but since we are running at higher priority than p it will not get to do
+ anything."
+ s signal.
+ p terminate.
+ self assert: ((s instVarNamed: #excessSignals) = 1)!
Item was added:
+ ----- Method: SemaphoreTest>>testSemaInCriticalWait (in category 'testing') -----
+ testSemaInCriticalWait "self run: #testSemaInCriticalWait"
+ "This tests whether a semaphore that has entered the wait in Semaphore>>critical:
+ leaves it without signaling the associated semaphore."
+ | s p |
+ s := Semaphore new.
+ p := [s critical:[]] fork.
+ Processor yield.
+ self assert:(p suspendingList == s).
+ p terminate.
+ self assert:((s instVarNamed: #excessSignals) = 0)!
Locked
