Squeak-dev July 2010

squeak-dev@lists.squeakfoundation.org

75 participants
234 discussions

How to unload features of 'Extending the System': a proposal
by Enrico Spinielli 26 Jul '10

26 Jul '10

Hi all, after having experimented with some features as described in Help -> Extending the System I wanted to unload them, but did not find how to. So I came out with the following: ---------------------- ins := (Installer wiresong project: 'ob'). pkgs := #('OmniBrowser' 'OB-Morphic' 'OB-Standard' 'OB-Shout' 'OB-SUnitIntegration'). pkgs do: [:pkg| ins install: pkg]. pkgs reverseDo: [:pkg| (MCPackage named: pkg) unload]. SystemOrganization removeEmptyCategories. ---------------------- Is there a better way? Is it worth updating 'Extending the System' (with the caveat when you unload you have to make sure one of the packages is not needed by other 'features')? Feedback and suggestions are of course welcome Bye Enrico -- Enrico Spinielli "Do Androids dream of electric sheep?"— Philip K. Dick "Hear and forget; see and remember;do and understand."—Mitchel Resnick

2 1

Daily Commit Log
by commits＠source.squeak.org 26 Jul '10

26 Jul '10

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2010-July/003571.html Name: Compiler-nice.153 Ancestors: Compiler-nice.152 Use more explicit storeStringHex rather than floating hex in order to be more robust. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003572.html Name: Graphics-nice.145 Ancestors: Graphics-ar.144, Graphics-nice.139 Merge Graphics-nice.139: Change behaviour of empty Rectangle: - don't let an empty Rectangle #intersects: - let #flipBy:centerAt: and #rotateBy:centerAt: preserve a Rectangle emptyness ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003573.html Name: Graphics-nice.139 Ancestors: Graphics-cmm.138 Change behaviour of empty Rectangle: - don't let an empty Rectangle #intersects: - let #flipBy:centerAt: and #rotateBy:centerAt: preserve a Rectangle emptyness ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003574.html Name: Graphics-nice.146 Ancestors: Graphics-nice.145 Provides a more verbose Rectangle comment advertising about usual conventions and degenerated (empty) Rectangles. =============================================

1 0

TestRunner not assigning strings/remembering old values of temp vars.
by Rob Withers 25 Jul '10

25 Jul '10

I am testing the CryptoDESTest. I am getting some strange behavior. When I run the following code in a Workspace, repeatably, I get the same results: code: | plain key d | plain := 'squeaker'. key := 'hacking!'. Transcript cr; show: 'plain: ', plain printString. d := DES key: key. d encryptBlock: plain. Transcript cr; show: 'plain: ', plain printString. self assert: plain asByteArray = #[64 222 70 13 59 145 76 186]. plain destroy. output: plain: 'squeaker' plain: '@ÞF ;Lº' plain: 'squeaker' plain: '@ÞF ;Lº' plain: 'squeaker' plain: '@ÞF ;Lº' However, when I run this as a test method: testDES3 | plain key d | plain := 'squeaker'. key := 'hacking!'. Transcript cr; show: 'plain: ', plain printString. d := DES key: key. d encryptBlock: plain. Transcript cr; show: 'plain: ', plain printString. self assert: plain asByteArray = #[64 222 70 13 59 145 76 186]. plain destroy. I get the following output and the test fails: plain: 'squeaker' plain: '@ÞF ;Lº' plain: ' ' plain: '£¼ïùmÞ$' plain: '£¼ïùmÞ$' plain: '§,}ºé¨öú' plain: '§,}ºé¨öú' plain: '3qX¦wRË|' plain: '3qX¦wRË|' plain: 'Ê0ê^ó{ì' plain: 'Ê0ê^ó{ì' plain: 'çî³,Î¯w' Why is test runner remembering the old value and not setting it with: plain := 'squeaker'.? TIA, Rob

3 8

The Trunk: Graphics-nice.146.mcz
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Nicolas Cellier uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-nice.146.mcz ==================== Summary ==================== Name: Graphics-nice.146 Author: nice Time: 25 July 2010, 2:59:32.851 pm UUID: b137d815-9abe-40b6-9f7f-f24057b9d25e Ancestors: Graphics-nice.145 Provides a more verbose Rectangle comment advertising about usual conventions and degenerated (empty) Rectangles. =============== Diff against Graphics-nice.145 =============== Item was changed: Object subclass: #Rectangle instanceVariableNames: 'origin corner' classVariableNames: '' poolDictionaries: '' category: 'Graphics-Primitives'! + !Rectangle commentStamp: 'nice 7/25/2010 14:56' prior: 0! + I represent a rectangular area of the screen. Arithmetic functions take points as arguments and carry out scaling and translating operations to create new instances of me. Rectangle functions create new instances by determining intersections of rectangles with rectangles. + + Note 1: only rectangles parallel to reference frame (Screen) can be represented by this class. + + Note 2: the Rectangle is represented by two extremities of one diagonal. By convention, it must be the diagonal: + from rectangle origin (the point having smallest coordinates in reference frame), + to rectangle corner (the point having largest coordinates in reference frame). + + Note 3: Screen coordinates conventions are: + x is horizontal axis, zero at left border, oriented toward right; + y is vertical axis, zero at top border, oriented toward bottom. + This corresponds to the latin convention for writing text from left to right and top to bottom. + + Note 4: the Rectangle extent is obtained by subtracting rectangle origin to rectangle corner coordinates. + If this leads to a negative width (extent x coordinate) and/or a negative height (extent y coordinate), then the Rectangle is degenerated and considered empty. + + Instance variables: + origin <Point> the coordinates of corner having smallest coordinates (top left in Screen coordinates) + corner <Point> the coordinates of corner having largest coordinates (bottom right in Screen coordinates) + ! - !Rectangle commentStamp: '<historical>' prior: 0! - I represent a rectangular area of the screen. Arithmetic functions take points as arguments and carry out scaling and translating operations to create new instances of me. Rectangle functions create new instances by determining intersections of rectangles with rectangles.!

1 0

The Trunk: Graphics-nice.139.mcz
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Nicolas Cellier uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-nice.139.mcz ==================== Summary ==================== Name: Graphics-nice.139 Author: nice Time: 20 June 2010, 10:08:24.066 pm UUID: 223e2d4c-b60c-834e-8a77-5b84e525c6f7 Ancestors: Graphics-cmm.138 Change behaviour of empty Rectangle: - don't let an empty Rectangle #intersects: - let #flipBy:centerAt: and #rotateBy:centerAt: preserve a Rectangle emptyness =============== Diff against Graphics-cmm.138 =============== Item was changed: ----- Method: Rectangle>>intersects: (in category 'testing') ----- intersects: aRectangle "Answer whether aRectangle intersects the receiver anywhere." "Optimized; old code answered: (origin max: aRectangle origin) < (corner min: aRectangle corner)" | rOrigin rCorner | rOrigin := aRectangle origin. rCorner := aRectangle corner. rCorner x <= origin x ifTrue: [^ false]. rCorner y <= origin y ifTrue: [^ false]. rOrigin x >= corner x ifTrue: [^ false]. rOrigin y >= corner y ifTrue: [^ false]. + "None of the two rectangle shall be empty" + corner x <= origin x ifTrue: [^ false]. + corner y <= origin y ifTrue: [^ false]. + rCorner x <= rOrigin x ifTrue: [^ false]. + rCorner y <= rOrigin y ifTrue: [^ false]. ^ true ! Item was changed: ----- Method: Rectangle>>rotateBy:centerAt: (in category 'transforming') ----- rotateBy: direction centerAt: aPoint "Return a copy rotated #right, #left, or #pi about aPoint" + | futureOrigin futureCorner | + direction == #pi + ifTrue: + [futureOrigin := self corner. + futureCorner := self origin] + ifFalse: [direction == #left + ifTrue: + [futureOrigin := self topRight. + futureCorner := self bottomLeft] + ifFalse: [direction == #right + ifTrue: + [futureOrigin := self bottomLeft. + futureCorner := self topRight] + ifFalse: [self error: 'unrecognizable direction']]]. + ^ (futureOrigin rotateBy: direction centerAt: aPoint) + corner: (futureCorner rotateBy: direction centerAt: aPoint)! - ^ (origin rotateBy: direction centerAt: aPoint) - rect: (corner rotateBy: direction centerAt: aPoint)! Item was changed: ----- Method: Rectangle>>flipBy:centerAt: (in category 'transforming') ----- flipBy: direction centerAt: aPoint "Return a copy flipped #vertical or #horizontal, about aPoint." + | futureOrigin futureCorner | + direction == #horizontal + ifTrue: + [futureOrigin := self topRight. + futureCorner := self bottomLeft] + ifFalse: [direction == #vertical + ifTrue: + [futureOrigin := self bottomLeft. + futureCorner := self topRight] + ifFalse: [self error: 'unrecognizable direction']]. + ^ (futureOrigin flipBy: direction centerAt: aPoint) + corner: (futureCorner flipBy: direction centerAt: aPoint)! - ^ (origin flipBy: direction centerAt: aPoint) - rect: (corner flipBy: direction centerAt: aPoint)!

1 0

The Trunk: Graphics-nice.145.mcz
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Nicolas Cellier uploaded a new version of Graphics to project The Trunk: http://source.squeak.org/trunk/Graphics-nice.145.mcz ==================== Summary ==================== Name: Graphics-nice.145 Author: nice Time: 25 July 2010, 2:24:08.202 pm UUID: 81bcb012-b80d-4074-898f-4f9cb77a4534 Ancestors: Graphics-ar.144, Graphics-nice.139 Merge Graphics-nice.139: Change behaviour of empty Rectangle: - don't let an empty Rectangle #intersects: - let #flipBy:centerAt: and #rotateBy:centerAt: preserve a Rectangle emptyness =============== Diff against Graphics-ar.144 =============== Item was changed: ----- Method: Rectangle>>intersects: (in category 'testing') ----- intersects: aRectangle "Answer whether aRectangle intersects the receiver anywhere." "Optimized; old code answered: (origin max: aRectangle origin) < (corner min: aRectangle corner)" | rOrigin rCorner | rOrigin := aRectangle origin. rCorner := aRectangle corner. rCorner x <= origin x ifTrue: [^ false]. rCorner y <= origin y ifTrue: [^ false]. rOrigin x >= corner x ifTrue: [^ false]. rOrigin y >= corner y ifTrue: [^ false]. + "None of the two rectangle shall be empty" + corner x <= origin x ifTrue: [^ false]. + corner y <= origin y ifTrue: [^ false]. + rCorner x <= rOrigin x ifTrue: [^ false]. + rCorner y <= rOrigin y ifTrue: [^ false]. ^ true ! Item was changed: ----- Method: Rectangle>>rotateBy:centerAt: (in category 'transforming') ----- rotateBy: direction centerAt: aPoint "Return a copy rotated #right, #left, or #pi about aPoint" + | futureOrigin futureCorner | + direction == #pi + ifTrue: + [futureOrigin := self corner. + futureCorner := self origin] + ifFalse: [direction == #left + ifTrue: + [futureOrigin := self topRight. + futureCorner := self bottomLeft] + ifFalse: [direction == #right + ifTrue: + [futureOrigin := self bottomLeft. + futureCorner := self topRight] + ifFalse: [self error: 'unrecognizable direction']]]. + ^ (futureOrigin rotateBy: direction centerAt: aPoint) + corner: (futureCorner rotateBy: direction centerAt: aPoint)! - ^ (origin rotateBy: direction centerAt: aPoint) - rect: (corner rotateBy: direction centerAt: aPoint)! Item was changed: ----- Method: Rectangle>>flipBy:centerAt: (in category 'transforming') ----- flipBy: direction centerAt: aPoint "Return a copy flipped #vertical or #horizontal, about aPoint." + | futureOrigin futureCorner | + direction == #horizontal + ifTrue: + [futureOrigin := self topRight. + futureCorner := self bottomLeft] + ifFalse: [direction == #vertical + ifTrue: + [futureOrigin := self bottomLeft. + futureCorner := self topRight] + ifFalse: [self error: 'unrecognizable direction']]. + ^ (futureOrigin flipBy: direction centerAt: aPoint) + corner: (futureCorner flipBy: direction centerAt: aPoint)! - ^ (origin flipBy: direction centerAt: aPoint) - rect: (corner flipBy: direction centerAt: aPoint)!

1 0

The Trunk: Compiler-nice.153.mcz
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Nicolas Cellier uploaded a new version of Compiler to project The Trunk: http://source.squeak.org/trunk/Compiler-nice.153.mcz ==================== Summary ==================== Name: Compiler-nice.153 Author: nice Time: 25 July 2010, 12:27:53.774 pm UUID: aa667119-b47a-44af-8bad-ff79f3c51d81 Ancestors: Compiler-nice.152 Use more explicit storeStringHex rather than floating hex in order to be more robust. =============== Diff against Compiler-nice.152 =============== Item was changed: ----- Method: Scanner>>xIllegal (in category 'multi-character scans') ----- xIllegal "An illegal character was encountered" + self notify: 'Illegal character (char code ' , hereChar charCode , ' ' , hereChar charCode storeStringHex , ')' at: mark! - self notify: 'Illegal character (char code ' , hereChar charCode , ' 16r' , hereChar charCode hex , ')' at: mark!

1 0

DESPlugin is broken
by Rob Withers 25 Jul '10

25 Jul '10

Hans-Martin Mosner, if you have your ears on, I could use some help figuring out the algorithm. Anyone else for that matter. Here is the spec: http://csrc.nist.gov/publications/fips/fips46-3/fips46-3.pdf The key is cooked for encryption or decryption The data block is submitted for encryption (or decryption, depending on the cooked key) - first the data block is permuted using the Initial Permutation - result of the permutation step is encrypted using the cooked key - result of the encryption step is permuted using the inverse of the Initial Permutation I do not know if the problem is with the key cooking or the encryption transformation. Thanks for any help! Rob

2 3

Daily Commit Log
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Changes to Trunk (http://source.squeak.org/trunk.html) in the last 24 hours: http://lists.squeakfoundation.org/pipermail/packages/2010-July/003566.html Name: Compiler-nice.152 Ancestors: Compiler-jcg.147 Add the possibility in new code generation scheme to access shared variables by sending message #value to the variable binding instead of fetching second instance variable. This did already exist in old code generation scheme and is controlled by #isSpecialReadBinding. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003567.html Name: GraphicsTests-nice.26 Ancestors: GraphicsTests-wiz.25 Remove potential sends of @- Now that $- is allowed in binary messages at any place, this potentially is ambiguous. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003568.html Name: KernelTests-nice.156 Ancestors: KernelTests-ar.155 Remove potential sends of /- Now that $- is allowed in binary messages at any place, this potentially is ambiguous. ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003569.html Name: Network-ar.75 Ancestors: Network-ar.74 Some SocketStream simplifications: Avoid duplication between #receiveData; #receiveDataIfAvailable; and #receiveAvailableData; they are just minor variants of each other. Also bottleneck all socket reads and writes in two SocketStream methods #receiveDataInto:startingAt: and #sendData:count: so that subclasses can do additional operations on them (encryption, statistics etc). ============================================= http://lists.squeakfoundation.org/pipermail/packages/2010-July/003570.html Name: Network-ar.76 Ancestors: Network-ar.75 Add long missing SocketStream>>destroy method. =============================================

1 0

The Trunk: Network-ar.76.mcz
by commits＠source.squeak.org 25 Jul '10

25 Jul '10

Andreas Raab uploaded a new version of Network to project The Trunk: http://source.squeak.org/trunk/Network-ar.76.mcz ==================== Summary ==================== Name: Network-ar.76 Author: ar Time: 24 July 2010, 3:13:49.41 pm UUID: b1521559-931f-0340-8ca4-cd846a3ed667 Ancestors: Network-ar.75 Add long missing SocketStream>>destroy method. =============== Diff against Network-ar.75 =============== Item was added: + ----- Method: SocketStream>>destroy (in category 'initialize-release') ----- + destroy + "Destroy the receiver and its underlying socket. Does not attempt to flush the output buffers. For a graceful close use SocketStream>>close instead." + + socket ifNotNil:[socket destroy]!

1 0

← Newer
1
2
3
4
5
6
7
8
9
...
24
Older →

Jump to page: