Packages November 2010

packages@lists.squeakfoundation.org

1 participants
285 discussions

The Trunk: Tools-ul.275.mcz
by commits＠source.squeak.org 02 Nov '10

02 Nov '10

Levente Uzonyi uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-ul.275.mcz ==================== Summary ==================== Name: Tools-ul.275 Author: ul Time: 2 November 2010, 1:22:22.534 am UUID: d003e353-6573-484e-b6f6-8e337da6d123 Ancestors: Tools-ul.274 - fix: copy class instance variables and class comments when creating a copy of a class =============== Diff against Tools-ul.274 =============== Item was changed: ----- Method: Browser>>copyClass (in category 'class functions') ----- copyClass + | originalClass originalName copysName | - | originalName copysName oldDefinition newDefinition | classListIndex = 0 ifTrue: [^ self]. self okToChange ifFalse: [^ self]. + originalClass := self selectedClass. + originalName := originalClass name. - originalName := self selectedClass name. copysName := self request: 'Please type new class name' initialAnswer: originalName. copysName = '' ifTrue: [^ self]. " Cancel returns '' " copysName := copysName asSymbol. copysName = originalName ifTrue: [^ self]. (Smalltalk hasClassNamed: copysName) ifTrue: [^ self error: copysName , ' already exists']. + Cursor wait showWhile: [ + | newDefinition newMetaDefinition newClass | + newDefinition := originalClass definition + copyReplaceAll: originalName printString + with: copysName printString. + newClass := Compiler evaluate: newDefinition logged: true. + newMetaDefinition := originalClass class definition + copyReplaceAll: originalClass class name + with: newClass class name. + Compiler evaluate: newMetaDefinition logged: true. + newClass copyAllCategoriesFrom: originalClass. + newClass class copyAllCategoriesFrom: originalClass class. + originalClass hasComment ifTrue: [ + newClass comment: originalClass comment ] ]. - oldDefinition := self selectedClass definition. - newDefinition := oldDefinition copyReplaceAll: '#' , originalName asString with: '#' , copysName asString. - Cursor wait - showWhile: [| class | - class := Compiler evaluate: newDefinition logged: true. - class copyAllCategoriesFrom: (Smalltalk at: originalName). - class class copyAllCategoriesFrom: (Smalltalk at: originalName) class]. self classListIndex: 0. self changed: #classList!

1 0

The Trunk: Tools-ul.275.mcz
by commits＠source.squeak.org 02 Nov '10

02 Nov '10

1 0

The Trunk: Kernel-nice.511.mcz
by commits＠source.squeak.org 01 Nov '10

01 Nov '10

Nicolas Cellier uploaded a new version of Kernel to project The Trunk: http://source.squeak.org/trunk/Kernel-nice.511.mcz ==================== Summary ==================== Name: Kernel-nice.511 Author: nice Time: 1 November 2010, 11:59:51.145 am UUID: 4f6eaafc-6665-4092-ac07-d87ecb2b5d30 Ancestors: Kernel-nice.510 Correct the confusion radiansToDegrees/degreesToRadians Thanks Bert =============== Diff against Kernel-nice.510 =============== Item was changed: ----- Method: Float>>degreeCos (in category 'mathematical functions') ----- degreeCos "Take care of exceptional values" self isFinite ifTrue: [^super degreeCos]. + ^self degreesToRadians cos! - ^self radiansToDegrees cos! Item was changed: ----- Method: Float>>degreeSin (in category 'mathematical functions') ----- degreeSin "Take care of exceptional values" self isFinite ifTrue: [^super degreeSin]. + ^self degreesToRadians sin! - ^self radiansToDegrees sin!

1 0

The Trunk: Kernel-nice.511.mcz
by commits＠source.squeak.org 01 Nov '10

01 Nov '10

1 0

The Trunk: Kernel-nice.511.mcz
by commits＠source.squeak.org 01 Nov '10

01 Nov '10

1 0

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 2010