Packages March 2013

packages@lists.squeakfoundation.org

1 participants
258 discussions

The Trunk: System-fbs.516.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

Frank Shearar uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-fbs.516.mcz ==================== Summary ==================== Name: System-fbs.516 Author: fbs Time: 4 March 2013, 10:21:47.905 pm UUID: d3eb929e-b62e-4856-80fd-ae702fa890fc Ancestors: System-nice.515 All this method's senders are in the Etoys package, so it almost certainly belongs in the Etoys package. =============== Diff against System-nice.515 =============== Item was removed: - ----- Method: Utilities class>>getterSelectorFor: (in category 'miscellaneous') ----- - getterSelectorFor: identifier - "Answer the corresponding getter. Two idiosyncratic vectorings herein... " - - "Utilities getterSelectorFor: #elvis" - - | aSymbol | - (aSymbol := identifier asSymbol) == #isOverColor: ifTrue: [^ #seesColor:]. - aSymbol == #copy ifTrue: [^ #getNewClone]. - - ^ ('get', (identifier asString capitalized)) asSymbol!

1 0

The Trunk: Kernel-bf.744.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

Bert Freudenberg uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-bf.744.mcz ==================== Summary ==================== Name: Kernel-bf.744 Author: bf Time: 4 March 2013, 3:25:12.024 pm UUID: e3c35ac4-6571-4bcc-86d4-ccb613a8e631 Ancestors: Kernel-nice.743 Sanitize Time class>>readFrom: to not read beyond the time. Use that to sanitize DateAndTime class>>readFrom:, too, avoiding the only known use of PositionableStream>>last. Time tests are still green. =============== Diff against Kernel-nice.743 =============== Item was changed: ----- Method: DateAndTime class>>readFrom: (in category 'squeak protocol') ----- readFrom: aStream | offset date time ch | date := Date readFrom: aStream. [aStream peek isDigit] whileFalse: [aStream next]. time := Time readFrom: aStream. + (aStream atEnd or: [('+-Z' includes: aStream peek) not]) + ifTrue: [offset := self localOffset] + ifFalse: [(aStream peekFor: $Z) + ifTrue: [offset := Duration zero] + ifFalse: [ + ch := aStream next. + ch = $+ ifTrue: [ch := Character space]. + offset := Duration fromString: ch asString, '0:', aStream upToEnd, ':0']]. - aStream atEnd - ifTrue: [ (aStream last = $Z) ifTrue: [offset := Duration zero] ifFalse: [ offset := self localOffset ]] - ifFalse: [ - ch := aStream next. - ch = $+ ifTrue: [ch := Character space]. - offset := Duration fromString: ch asString, '0:', aStream upToEnd, ':0']. - ^ self year: date year month: date monthIndex day: date dayOfMonth hour: time hour minute: time minute second: time second nanoSecond: time nanoSecond offset: offset " '-1199-01-05T20:33:14.321-05:00' asDateAndTime ' 2002-05-16T17:20:45.1+01:01' asDateAndTime ' 2002-05-16T17:20:45.02+01:01' asDateAndTime ' 2002-05-16T17:20:45.003+01:01' asDateAndTime ' 2002-05-16T17:20:45.0004+01:01' asDateAndTime ' 2002-05-16T17:20:45.00005' asDateAndTime ' 2002-05-16T17:20:45.000006+01:01' asDateAndTime ' 2002-05-16T17:20:45.0000007+01:01' asDateAndTime ' 2002-05-16T17:20:45.00000008-01:01' asDateAndTime ' 2002-05-16T17:20:45.000000009+01:01' asDateAndTime ' 2002-05-16T17:20:45.0000000001+01:01' asDateAndTime ' 2002-05-16T17:20' asDateAndTime ' 2002-05-16T17:20:45' asDateAndTime ' 2002-05-16T17:20:45+01:57' asDateAndTime ' 2002-05-16T17:20:45-02:34' asDateAndTime ' 2002-05-16T17:20:45+00:00' asDateAndTime ' 1997-04-26T01:02:03+01:02:3' asDateAndTime "! Item was changed: ----- Method: Time class>>readFrom: (in category 'smalltalk-80') ----- readFrom: aStream "Read a Time from the stream in the form: <hour>:<minute>:<second> <am/pm> <minute>, <second> or <am/pm> may be omitted. e.g. 1:59:30 pm; 8AM; 15:30" | hour minute second ampm nanos nanosBuffer | hour := Integer readFrom: aStream. minute := 0. second := 0. nanosBuffer := '000000000' copy. nanos := WriteStream on: nanosBuffer. (aStream peekFor: $:) ifTrue: [ minute := Integer readFrom: aStream. (aStream peekFor: $:) ifTrue: [ + second := Integer readFrom: aStream. - second := Integer readFrom: aStream]. (aStream peekFor: $.) ifTrue: [ [aStream atEnd not and: [aStream peek isDigit]] + whileTrue: [nanos nextPut: aStream next]]]]. - whileTrue: [nanos nextPut: aStream next]]]. aStream skipSeparators. + (aStream atEnd not and: ['PApa' includes: aStream peek]) ifTrue: - (aStream atEnd not and: [aStream peek isLetter]) ifTrue: [ampm := aStream next asLowercase. + (ampm = $p and: [hour < 12]) ifTrue: [hour := hour + 12]. - - (ampm = $p and: [hour < 12]) ifTrue: [hour := hour + 12]. (ampm = $a and: [hour = 12]) ifTrue: [hour := 0]. + (aStream peekFor: $m) ifFalse: [aStream peekFor: $M ]]. - - (aStream peekFor: $m) ifFalse: [aStream peekFor: $M ]]. ^ self hour: hour minute: minute second: second nanoSecond: nanosBuffer asInteger "Time readFrom: (ReadStream on: '2:23:09 pm')"!

1 0

The Trunk: Kernel-bf.744.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

1 0

The Trunk: Kernel-bf.744.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

1 0

The Trunk: Collections-bf.505.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

Bert Freudenberg uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-bf.505.mcz ==================== Summary ==================== Name: Collections-bf.505 Author: bf Time: 4 March 2013, 2:39:40.648 pm UUID: e14ee10f-5db6-49d0-9b98-e6f3f1aa0403 Ancestors: Collections-nice.504 Put back PositionableStream>>last with a better comment. =============== Diff against Collections-nice.504 =============== Item was added: + ----- Method: PositionableStream>>last (in category 'accessing') ----- + last + "Return the element that was read last" + + ^ collection at: position!

1 0

The Trunk: Collections-bf.505.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

1 0

The Trunk: Collections-bf.505.mcz
by commits＠source.squeak.org 04 Mar '13

04 Mar '13

1 0

The Trunk: System-nice.515.mcz
by commits＠source.squeak.org 03 Mar '13

03 Mar '13

Nicolas Cellier uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-nice.515.mcz ==================== Summary ==================== Name: System-nice.515 Author: nice Time: 3 March 2013, 3:04:10.18 pm UUID: b83c7e61-2ef3-4a54-9eff-c16f8722494c Ancestors: System-cwp.514 Remove #printOnStream: #storeOnStream: and #propertyListOn:. =============== Diff against System-cwp.514 =============== Item was removed: - ----- Method: ChangeSet>>printOnStream: (in category 'accessing') ----- - printOnStream: aStream - "2/7/96 sw: provide the receiver's name in the printout" - super printOnStream: aStream. - aStream print: ' named ', self name!

1 0

The Trunk: System-nice.515.mcz
by commits＠source.squeak.org 03 Mar '13

03 Mar '13

1 0

The Trunk: System-nice.515.mcz
by commits＠source.squeak.org 03 Mar '13

03 Mar '13

1 0

← Newer
1
...
18
19
20
21
22
23
24
25
26
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages March 2013