- Pharo-dev - lists.pharo.org

[Pharo-project] RBParser
by Gwenael Casaccio Nov. 29, 2008

Nov. 29, 2008

Hi guys, As I've said to you Marcus, I've worked on the RBParser/RBScanner. I've fixed these classes and now you can parse the entire image. At this moment the refactoring is not yet finished but I've made some good progress. Cheers, Gwenael Casaccio

6 13

[Pharo-project] [update] #10183
by Marcus Denker Nov. 29, 2008

Nov. 29, 2008

-> Issue 359: Freetype: fix DNU glyphcontrast -> Cleanups -> Prefences set to more useful values Classes removed: DummyToolWorkingWithFileList FileChooser FileList2ModalDialogsTest FileListTest MultiuserTinyPaint ProjectSorterMorph Unsent Methods removed: ScriptLoader class #loadPolymorphUI TileMorph: #handReferentMorph #currentDataValue #newContents:fromCard: #setNewContentsFrom: TextFieldMorph: #currentDataValue #setNewContentsFrom: StandardScriptingSystem #acceptableSlotNameFrom:forSlotCurrentlyNamed:asSlotNameIn:world: #anyButtonPressedTiles #colorBehindTiles #customEventNamesAndHelpStringsFor: #doesOperatorWantArrows: #fontForNameEditingInScriptor #globalCustomEventNames #globalCustomEventNamesFor: #helpStringForOperator: #inspectFormDictionary #installSolidMenuForm #nameForInstanceVariablesCategory #nameForScriptsCategory #noButtonPressedTiles #patchInNewStandardPlayerForm #readFormsFromFileNamed: #readFormsFromFileNamed:andStoreIntoGlobal: #referenceAt: #referenceAt:put: #removeCustomEventNamed:for: #resetStaleScriptingReferences #restoreClassicEToyLook #restorePrivateGraphics #saveFormsToFileNamed: #setterSelectorForGetter: #smallBoldFont #standardEventStati #standardForms #statusColorSymbolFor: #stepButton #stopButton #tryButtonFor: #wordingForOperator: StandardScriptingSystem class #noteCompilationOf:meta: SketchMorph class #exampleBackgroundSketch SketchMorph #currentDataValue PluggableTextMorphWithModel #currentDataValue ImageMorph #currentDataValue #wearCostume: HandMorph #trailMorph EventHandler #forgetDispatchesTo: CollapsedMorph class #collapsedMorphOrNilFor: isMyUncollapsedMorph: ClassDescription namedTileScriptSelectors ParagraphEditor #getPluggableYellowButtonMenu: #prettyPrintWithColor #scrollRectangleHeight #sendContentsToPrinter PasteUpMorph #residesInPartsBin BorderedMorph #understandsBorderVocabulary Morph class #additionsToViewerCategory: #allAdditionsToViewerCategories! #noteCompilationOf:meta: Morph #addGraphModelYellowButtonItemsTo:event: #allowsGestureStart: #altSpecialCursor0 #altSpecialCursor2 #connections #demandsBoolean #orOwnerSuchThat:#pinkXButton #redButtonGestureDictionaryOrName: #residesInPartsBin #saveOnURL #setAsActionInButtonProperties: #specialNameInModel #startWiring #wantsEmbeddingsVocabulary MorphicModel #choosePartName #allowSubmorphExtraction #compileInitMethods #duplicate:from: #propagate:as: MorphExtension #hasOtherProperties #privateOtherProperties: StandardFileMenu #computeLabelParagraph #patternList: SoundLoopMorph #allowSubmorphExtraction ProjectNavigationMorph #findAnything PopUpMenu #computeLabelParagraph PluggableTextMorph #prettyPrintWithColor #sendContentsToPrinter PasteUpMorph #findAFileList: MessageSet #optionalButtonHeight InternalThreadNavigationMorph #editThisThread FileList2 #dirSelectionBlock: #limitedSuperSwikiDirectoryList #limitedSuperSwikiPublishDirectoryList #listForPattern: #okHitForProjectLoader #removeLinefeeds #saveLocalOnlyHit FileList #listForPattern: #optionalButtonHeight Debugger #optionalButtonHeight ChangeList #optionalButtonHeight BookMorph #allowSubmorphExtraction #buildThreadOfProjects -- Marcus Denker -- denker(a)iam.unibe.ch http://www.iam.unibe.ch/~denker

1 0

[Pharo-project] [Request for Improvement] Cleverer alt-B
by StÃ©phane Ducasse Nov. 29, 2008

Nov. 29, 2008

Hi I would love to be able to type Scriptloader alt b and get the ScriptLoader class browsed. Stef

4 6

[Pharo-project] default selection of senders
by StÃ©phane Ducasse Nov. 28, 2008

Nov. 28, 2008

Hi all now I understand when I look for senders of objectViewed I get the method signature selected and it would be great if in such a case the real occurence would be selected instead objectViewed "Answer the morph associated with the player that the structure the receiver currently finds itself within represents." ^ (self outermostMorphThat: [:o | o isKindOf: Viewer orOf: ScriptEditorMorph]) objectViewed

2 2

[Pharo-project] [ANN] 10179 and 10180
by StÃ©phane Ducasse Nov. 27, 2008

Nov. 27, 2008

removed.... StandardScriptingSystem systemSlotNamesOfType: PasteUpMoprh additionsToViewerCategoryInput triggerOpeningScripts resumeScriptsPausedByPainting tellAllContent: Morph additionsToViewerCategoryConnection succeededInRevealing: scriptPerformer Morph class additionsToViewerCategoryColorAndBorder Object scriptPerformer Morph inspectArgumentsPlayerInMorphic: isCandidateForAutomaticViewing isTileEditor isTileLIke jettisonScripts listViewLineForFieldList: move:toPosition: objectViewed offerCostumeViewerMenu: playerRepresented

1 0

[Pharo-project] why do we need tests for imageSegment!
by StÃ©phane Ducasse Nov. 27, 2008

Nov. 27, 2008

declareAndPossiblyRename: classThatIsARoot | existing catInstaller | "The class just arrived in this segment. How fit it into the Smalltalk dictionary? If it had an association, that was installed with associationDeclareAt:." catInstaller := [ classThatIsARoot superclass name == #Player ifTrue: [classThatIsARoot category: Object categoryForUniclasses] ifFalse: [(classThatIsARoot superclass name beginsWith: 'WonderLandActor') ifTrue: [classThatIsARoot category: 'Balloon3D-UserObjects'] ifFalse: [classThatIsARoot category: 'Morphic-Imported']]. ]. classThatIsARoot superclass addSubclass: classThatIsARoot. (Smalltalk includesKey: classThatIsARoot name) ifFalse: [ "Class entry in Smalltalk not referred to in Segment, install anyway." catInstaller value. ^ Smalltalk at: classThatIsARoot name put: classThatIsARoot]. existing := Smalltalk at: classThatIsARoot name. existing xxxClass == ImageSegmentRootStub ifTrue: [ "We are that segment! Must ask it carefully!" catInstaller value. ^ Smalltalk at: classThatIsARoot name put: classThatIsARoot]. existing == false | (existing == nil) ifTrue: [ "association is in outPointers, just installed" catInstaller value. ^ Smalltalk at: classThatIsARoot name put: classThatIsARoot]. "Conflict with existing global or copy of the class" (existing isKindOf: Class) ifTrue: [ classThatIsARoot isSystemDefined not ifTrue: [ "UniClass. give it a new name" classThatIsARoot setName: classThatIsARoot baseUniclass chooseUniqueClassName. catInstaller value. "must be after new name" ^ Smalltalk at: classThatIsARoot name put: classThatIsARoot]. "Take the incoming one" self inform: 'Using newly arrived version of ', classThatIsARoot name. classThatIsARoot superclass removeSubclass: classThatIsARoot. "just in case" (Smalltalk at: classThatIsARoot name) becomeForward: classThatIsARoot. catInstaller value. ^ classThatIsARoot superclass addSubclass: classThatIsARoot]. self error: 'Name already in use by a non-class: ', classThatIsARoot name.

1 0

[Pharo-project] Do not see if class or instance is selected with polymorph
by StÃ©phane Ducasse Nov. 27, 2008

Nov. 27, 2008

1 0

Nov. 27, 2008

I would really like if somebody can check that if we remove that cool method SmartRefStream still work. A couple tests would be welcome. restoreClassInstVars "Install the values of the class instance variables of UniClasses (i.e. scripts slotInfo). classInstVars is ((#Player25 scripts slotInfo) ...). Thank you Mark Wai for the bug fix." | normal aName newName newCls trans rList start | self flag: #bobconv. self moreObjects ifFalse: [^ self]. "are no UniClasses with class inst vars" classInstVars := super next. "Array of arrays" normal := Object class instSize. "might give trouble if Player class superclass changes size" (structures at: #Player ifAbsent: [#()]) = #(0 'dependents' 'costume') ifTrue: [trans := 1]. "now (0 costume costumes). Do the conversion of Player class inst vars in Update 509." classInstVars do: [:list | aName := (list at: 1) asSymbol. rList := list. newName := renamed at: aName ifAbsent: [aName]. newCls := Smalltalk at: newName ifAbsent: [self error: 'UniClass definition missing']. ("old conversion" trans == 1 and: [newCls inheritsFrom: Player]) ifTrue: [ "remove costumeDictionary from Player class inst vars" rList := rList asOrderedCollection. rList removeAt: 4]. "costumeDictionary's value" start := list second = 'Update to read classPool' ifTrue: [4] ifFalse: [2]. newCls class instSize = (normal + (rList size) - start + 1) ifFalse: [self error: 'UniClass superclass class has changed size']. "Need to install a conversion method mechanism" start = 4 ifTrue: [newCls instVarAt: normal - 1 "classPool" put: (list at: 3)]. start to: rList size do: [:ii | newCls instVarAt: normal + ii - start + 1 put: (rList at: ii)]].

1 0

[Pharo-project] integrating polymorph....
by Torsten Bergmann Nov. 27, 2008

Nov. 27, 2008

Hi Markus, since Polymorph is now integrated the ScriptLoader(class)>>loadPolymorphUI method should be dropped. It's not necessary anymore. Thx Torsten -- Psssst! Schon vom neuen GMX MultiMessenger gehÃ¶rt? Der kann`s mit allen: http://www.gmx.net/de/go/multimessenger

1 0

[Pharo-project] integrating polymorph....
by Marcus Denker Nov. 27, 2008

Nov. 27, 2008

It loads already (update 10175). I am now making a sync update to sync the repository back with the image. (and remove a hack to not display a progressbar while loading). Should be done tonight. Marcus -- Marcus Denker -- denker(a)iam.unibe.ch http://www.iam.unibe.ch/~denker

5 14