Packages November 2011

packages@lists.squeakfoundation.org

1 participants
159 discussions

The Trunk: Monticello-bf.486.mcz
by commits＠source.squeak.org 16 Nov '11

16 Nov '11

Bert Freudenberg uploaded a new version of Monticello to project The Trunk: http://source.squeak.org/trunk/Monticello-bf.486.mcz ==================== Summary ==================== Name: Monticello-bf.486 Author: bf Time: 16 November 2011, 7:30:50.716 pm UUID: 8af90897-6dd4-4be6-b167-0d49b3997b4c Ancestors: Monticello-bf.485 - individual working copies should not use the default repository group but have their own - will be enforced for packages in update map =============== Diff against Monticello-bf.485 =============== Item was added: + ----- Method: MCWorkingCopy>>newRepositoryGroupIfDefault (in category 'repositories') ----- + newRepositoryGroupIfDefault + repositoryGroup == MCRepositoryGroup default + ifTrue: [repositoryGroup := MCRepositoryGroup new]!

1 0

The Trunk: Monticello-bf.486.mcz
by commits＠source.squeak.org 16 Nov '11

16 Nov '11

1 0

The Trunk: Monticello-bf.486.mcz
by commits＠source.squeak.org 16 Nov '11

16 Nov '11

1 0

The Trunk: Kernel-nice.653.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

Nicolas Cellier uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-nice.653.mcz ==================== Summary ==================== Name: Kernel-nice.653 Author: nice Time: 15 November 2011, 11:23:38.908 pm UUID: d149a4f7-f537-4f76-9b79-367acd0aa832 Ancestors: Kernel-laza.649 Minor refactoring of isProbablyPrime - Add more comments (tell it's a Miller Rabin test, tells about probabilities) - avoid repeated shift when #lowBit can help doing it once - refactor Knuth "P3" test to a simpler expression - and restore the fact that there is a step "P4" before "P5" =============== Diff against Kernel-laza.649 =============== Item was changed: ----- Method: Integer>>isProbablyPrime (in category 'testing') ----- isProbablyPrime "See isProbablyPrimeWithK:andQ: for the algoritm description." | k q | self <= 1 ifTrue: [ ^false ]. self even ifTrue: [ ^self = 2 ]. + "Factor self into (2 raisedTo: k) * q + 1, where q odd" + q := self bitShift: -1. + k := q lowBit. + q := q bitShift: 1 - k. + "Repeat the probabilistic until false (the probability of false negative is null) or until probability is very low." - k := 1. - q := self - 1 bitShift: -1. - [ q odd ] whileFalse: [ - q := q bitShift: -1. - k := k + 1 ]. 25 timesRepeat: [ (self isProbablyPrimeWithK: k andQ: q) ifFalse: [ ^false ] ]. + "The probability of false positive after 25 iterations is less than (1/4 raisedTo: 25) < 1.0e-15" ^true! Item was changed: ----- Method: Integer>>isProbablyPrimeWithK:andQ: (in category 'private') ----- isProbablyPrimeWithK: k andQ: q "Algorithm P, probabilistic primality test, from Knuth, Donald E. 'The Art of Computer Programming', Vol 2, + Third Edition, section 4.5.4, page 395, P1-P5 refer to Knuth description.. + Note that this is a Miller Rabin test which may answer false positives (known as pseudoprimes) for at most 1/4 of the possible bases x." - Third Edition, section 4.5.4, page 395, P1-P5 refer to Knuth description." + | x j y minusOne | "P1" - - | x j y | x := (self - 2) atRandom + 1. "P2" j := 0. y := x raisedTo: q modulo: self. + minusOne := self - 1. - "P3" + ["P3" + y = 1 ifTrue: [^j = 0]. + y = minusOne ifTrue: [^true]. + "P4" + (j := j + 1) < k] + whileTrue: + [y := y squared \\ self]. - [((j = 0 and: [y = 1]) or: [y = (self - 1)]) ifTrue: [^true]. - (j > 0 and: [y = 1]) ifTrue: [^false]. "P5" + ^false! - j := j + 1. - j < k - ifTrue: [y := y squared \\ self] - ifFalse:[^ false]] repeat!

1 0

The Trunk: Kernel-nice.653.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

1 0

The Trunk: Kernel-nice.653.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

1 0

The Trunk: Tests-ul.135.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

Levente Uzonyi uploaded a new version of Tests to project The Trunk: http://source.squeak.org/trunk/Tests-ul.135.mcz ==================== Summary ==================== Name: Tests-ul.135 Author: ul Time: 15 November 2011, 3:54:58.229 pm UUID: e8a96efa-ec46-d04c-a6da-8f5261bf5e6a Ancestors: Tests-ul.134 Updated BlockLocalTemporariesRemovalTest >> #testBlockTemporaries to expect the removal of the empty line after the deletion of all unused temporaries. =============== Diff against Tests-ul.134 =============== Item was changed: ----- Method: BlockLocalTemporariesRemovalTest>>testBlockTemporaries (in category 'testing') ----- testBlockTemporaries | someCode someOtherCode | someCode := 'test | temp | [ | foo | ]'. someOtherCode := 'test | temp | [ ]'. self assert: someCode isChangedDuringParsingTo: someOtherCode withRemovalOfTemporariesNamed: #('foo'). someCode := 'test [ | foo | ]'. someOtherCode := 'test [ ]'. self assert: someCode isChangedDuringParsingTo: someOtherCode withRemovalOfTemporariesNamed: #('foo'). someCode := 'test | temp | [ | foo | ]'. someOtherCode := 'test - [ ]'. self assert: someCode isChangedDuringParsingTo: someOtherCode withRemovalOfTemporariesNamed: #('foo' 'temp').!

1 0

The Trunk: Tests-ul.135.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

1 0

The Trunk: Tests-ul.135.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

1 0

The Trunk: Files-ul.114.mcz
by commits＠source.squeak.org 15 Nov '11

15 Nov '11

Levente Uzonyi uploaded a new version of Files to project The Trunk: http://source.squeak.org/trunk/Files-ul.114.mcz ==================== Summary ==================== Name: Files-ul.114 Author: ul Time: 10 November 2011, 12:52:02.516 pm UUID: 287fe37a-7a91-fc40-b530-d9cac751dd77 Ancestors: Files-nice.113 Added missing space character. =============== Diff against Files-nice.113 =============== Item was changed: ----- Method: StandardFileStream>>primWrite:from:startingAt:count: (in category 'primitives') ----- primWrite: id from: stringOrByteArray startingAt: startIndex count: count "Write count bytes onto this file from the given string or byte array starting at the given index. Answer the number of bytes written." <primitive: 'primitiveFileWrite' module: 'FilePlugin'> (FileWriteError fileName: name) signal: (self closed ifTrue: [ 'File ', name, ' is closed' ] + ifFalse: [ 'File ', name, ' write failed' ])! - ifFalse: [ 'File ', name, 'write failed' ])!

1 0

← Newer
1
2
3
4
5
6
7
...
16
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 November 2011