Packages September 2012

packages@lists.squeakfoundation.org

1 participants
120 discussions

The Trunk: Kernel-ul.711.mcz
by commits＠source.squeak.org 21 Sep '12

21 Sep '12

Levente Uzonyi uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-ul.711.mcz ==================== Summary ==================== Name: Kernel-ul.711 Author: ul Time: 21 September 2012, 3:52:01.69 am UUID: 34bbbd59-62f6-8a4c-98a1-4277ce568856 Ancestors: Kernel-bf.710 Accept a block as description (besides a string) in Object>>assert:description:. This ensures that the method's behavior is the same as TestCase>>assert:description:'s. =============== Diff against Kernel-bf.710 =============== Item was changed: ----- Method: Object>>assert:description: (in category 'error handling') ----- + assert: aBlock description: aStringOrBlock - assert: aBlock description: aString "Throw an assertion error if aBlock does not evaluates to true." + aBlock value ifFalse: [ AssertionFailure signal: aStringOrBlock value ]! - aBlock value ifFalse: [AssertionFailure signal: aString ]!

1 0

The Trunk: SUnit-ul.89.mcz
by commits＠source.squeak.org 21 Sep '12

21 Sep '12

Levente Uzonyi uploaded a new version of SUnit to project The Trunk: http://source.squeak.org/trunk/SUnit-ul.89.mcz ==================== Summary ==================== Name: SUnit-ul.89 Author: ul Time: 21 September 2012, 3:50:20.289 am UUID: 57658f3e-8679-3748-82a8-c805c9e0c42d Ancestors: SUnit-ul.88 Accept a block (and strings as before) as description in TestCase >> #assert:description:. Instead of printing the objects all the time, only do that if the test fails in TestCase>>assert:equals: and TestCase>>assert:equals:description:. =============== Diff against SUnit-ul.88 =============== Item was changed: ----- Method: TestCase>>assert:description: (in category 'accessing') ----- + assert: aBooleanOrBlock description: aStringOrBlock + - assert: aBooleanOrBlock description: aString aBooleanOrBlock value ifFalse: [ + | description | + description := aStringOrBlock value. + self logFailure: description. + TestResult failure signal: description ] - self logFailure: aString. - TestResult failure signal: aString] ! Item was changed: ----- Method: TestCase>>assert:equals: (in category 'accessing') ----- assert: expected equals: actual + + ^self + assert: expected = actual + description: [ self comparingStringBetween: expected and: actual ] - ^ self - assert: (expected = actual) - description: (self comparingStringBetween: expected and: actual) ! Item was changed: ----- Method: TestCase>>assert:equals:description: (in category 'accessing') ----- assert: expected equals: actual description: aString + + ^self + assert: expected = actual + description: [ aString , ': ', (self comparingStringBetween: expected and: actual) ]! - ^ self - assert: (expected = actual) - description: aString , ': ', (self comparingStringBetween: expected and: actual)!

1 0

The Trunk: SUnit-ul.89.mcz
by commits＠source.squeak.org 21 Sep '12

21 Sep '12

1 0

The Trunk: SUnit-ul.89.mcz
by commits＠source.squeak.org 21 Sep '12

21 Sep '12

1 0

The Trunk: SUnitGUI-eem.56.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

Eliot Miranda uploaded a new version of SUnitGUI to project The Trunk: http://source.squeak.org/trunk/SUnitGUI-eem.56.mcz ==================== Summary ==================== Name: SUnitGUI-eem.56 Author: eem Time: 20 September 2012, 2:04:20.328 pm UUID: c155ae36-4f30-4a86-9ce5-2b1c8dd3de40 Ancestors: SUnitGUI-eem.53 Filter prompt needs to check for both nil and empty string to prevent cancel from destroying current patterns. =============== Diff against SUnitGUI-eem.53 =============== Item was changed: ----- Method: TestRunner>>filterCategories (in category 'accessing-categories') ----- filterCategories | pattern | pattern := UIManager default request: 'Pattern(s) to select categories:\ (separate patterns with '';'')' withCRs initialAnswer: (categoryPattern ifNil: ['*']). + (pattern isNil or: [pattern isEmpty]) ifTrue: + [^self]. - pattern isNil ifTrue: [ ^ self ]. categoriesSelected := ((categoryPattern := pattern) subStrings: ';') inject: Set new into: [:matches :subPattern| matches addAll: (categories select: [ :each | subPattern match: each]); yourself]. self changed: #allSelections; changed: #categorySelected; updateClasses! Item was changed: ----- Method: TestRunner>>filterClasses (in category 'accessing-classes') ----- filterClasses | pattern | pattern := UIManager default request: 'Pattern(s) to select tests:\ (separate patterns with '';'')' withCRs initialAnswer: (classPattern ifNil: '*'). + (pattern isNil or: [pattern isEmpty]) ifTrue: + [^self]. - pattern isNil ifTrue: [ ^ self ]. classesSelected := ((classPattern := pattern) subStrings: ';') inject: Set new into: [:matches :subPattern| matches addAll: (classes select: [ :each | subPattern match: each name]); yourself]. self changed: #allSelections; changed: #classSelected; changed: #hasRunnable!

1 0

The Trunk: SUnitGUI-eem.56.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

1 0

The Trunk: SUnitGUI-eem.56.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

1 0

The Trunk: SUnitGUI-eem.53.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

Eliot Miranda uploaded a new version of SUnitGUI to project The Trunk: http://source.squeak.org/trunk/SUnitGUI-eem.53.mcz ==================== Summary ==================== Name: SUnitGUI-eem.53 Author: eem Time: 20 September 2012, 11:07:56.257 am UUID: 2a734976-4fc9-414d-8884-986f5bf9ff58 Ancestors: SUnitGUI-ul.52 Make TestRunner Filter... recognize multiple patterns separated by semicolons. Remember previous patterns in subsequent prompts. =============== Diff against SUnitGUI-ul.52 =============== Item was changed: Object subclass: #TestRunner + instanceVariableNames: 'categories categoriesSelected classes classIndex classesSelected failedList failedSelected errorList errorSelected lastUpdate result previousRun categoryPattern classPattern' - instanceVariableNames: 'categories categoriesSelected classes classIndex classesSelected failedList failedSelected errorList errorSelected lastUpdate result previousRun' classVariableNames: '' poolDictionaries: '' category: 'SUnitGUI'! !TestRunner commentStamp: '<historical>' prior: 0! <lint: #ignore rule: #classNotReferenced rational: 'this view is only accessed from menus'> ! Item was changed: ----- Method: TestRunner>>filterCategories (in category 'accessing-categories') ----- filterCategories | pattern | pattern := UIManager default + request: 'Pattern(s) to select categories:\ (separate patterns with '';'')' withCRs + initialAnswer: (categoryPattern ifNil: ['*']). - request: 'Pattern to select categories:' - initialAnswer: '*'. pattern isNil ifTrue: [ ^ self ]. + categoriesSelected := ((categoryPattern := pattern) subStrings: ';') + inject: Set new + into: [:matches :subPattern| + matches + addAll: (categories select: [ :each | subPattern match: each]); + yourself]. - categoriesSelected := (categories - select: [ :each | pattern match: each ]) asSet. self changed: #allSelections; changed: #categorySelected; updateClasses! Item was changed: ----- Method: TestRunner>>filterClasses (in category 'accessing-classes') ----- filterClasses | pattern | pattern := UIManager default + request: 'Pattern(s) to select tests:\ (separate patterns with '';'')' withCRs + initialAnswer: (classPattern ifNil: '*'). - request: 'Pattern to select tests:' - initialAnswer: '*'. pattern isNil ifTrue: [ ^ self ]. + classesSelected := ((classPattern := pattern) subStrings: ';') + inject: Set new + into: [:matches :subPattern| + matches + addAll: (classes select: [ :each | subPattern match: each name]); + yourself]. - classesSelected := (classes select: [ :each | - pattern match: each name ]) asSet. self changed: #allSelections; changed: #classSelected; changed: #hasRunnable!

1 0

The Trunk: SUnitGUI-eem.53.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

1 0

The Trunk: SUnitGUI-eem.53.mcz
by commits＠source.squeak.org 20 Sep '12

20 Sep '12

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages September 2012