Packages March 2023

packages@lists.squeakfoundation.org

1 participants
60 discussions

The Trunk: Files-mt.202.mcz
by commits＠source.squeak.org 15 Mar '23

15 Mar '23

Marcel Taeumel uploaded a new version of Files to project The Trunk: http://source.squeak.org/trunk/Files-mt.202.mcz ==================== Summary ==================== Name: Files-mt.202 Author: mt Time: 15 March 2023, 2:50:54.444794 pm UUID: 7d90b3fe-12bc-7a42-8266-9d5f8faf4a41 Ancestors: Files-mt.201 Remove another dependency to MorphicExtras =============== Diff against Files-mt.201 =============== Item was changed: ----- Method: StandardFileStream>>directoryUrl (in category 'access') ----- directoryUrl + ^ self directory asUrl asString! - ^ self directory url!

1 0

The Trunk: Files-mt.201.mcz
by commits＠source.squeak.org 15 Mar '23

15 Mar '23

Marcel Taeumel uploaded a new version of Files to project The Trunk: http://source.squeak.org/trunk/Files-mt.201.mcz ==================== Summary ==================== Name: Files-mt.201 Author: mt Time: 15 March 2023, 2:47:04.595644 pm UUID: 54f012ce-26cd-514a-af62-27986045b252 Ancestors: Files-eem.200 Remove dependency to MorphicExtras =============== Diff against Files-eem.200 =============== Item was changed: ----- Method: FileDirectory class>>urlForFileNamed: (in category 'name utilities') ----- urlForFileNamed: aFilename "Create a URL for the given fully qualified file name" "FileDirectory urlForFileNamed: 'C:\Home\andreasr\Squeak\DSqueak3\DSqueak3:=1.1\DSqueak3.1.image' " | path localName | DirectoryClass splitName: aFilename to: [:p :n | path := p. localName := n]. + ^ localName asUrlRelativeTo: (self on: path) asUrl! - ^ localName asUrlRelativeTo: (self on: path) url asUrl! Item was changed: ----- Method: FileDirectory>>realUrl (in category 'file name utilities') ----- realUrl "Senders expect url without trailing slash - #url returns slash" | url | + url := self asUrl asString. - url := self url. url last = $/ ifTrue:[^url copyFrom: 1 to: url size-1]. ^url!

1 0

FFI: FFI-Tests-eem.72.mcz
by commits＠source.squeak.org 12 Mar '23

12 Mar '23

Eliot Miranda uploaded a new version of FFI-Tests to project FFI: http://source.squeak.org/FFI/FFI-Tests-eem.72.mcz ==================== Summary ==================== Name: FFI-Tests-eem.72 Author: eem Time: 11 March 2023, 6:02:05.143806 pm UUID: f648c603-4287-4f11-a6c8-32cd6d357cdf Ancestors: FFI-Tests-eem.71 Oops; the check shoudl really check the SqueakFFIPrims verison number, not the VM's. =============== Diff against FFI-Tests-eem.71 =============== Item was changed: ----- Method: FFIPluginTests>>arm64Check (in category 'support') ----- arm64Check "If required, mark the current test as failure to avoid segmentation fault due to issues in older versions of the plugin code." + + | ffiVersion | - (FFIPlatformDescription current isARM and: [FFIPlatformDescription current wordSize = 8 + and: [ffiVersion := Integer readFrom: (self pluginName subsequences: $.) last. + ffiVersion < 3309]]) ifTrue: - and: [Smalltalk vmVMMakerVersion < 3309]]) ifTrue: [self fail: 'Not supported. Segmentation fault avoided.']! Item was added: + ----- Method: FFIPluginTests>>pluginName (in category 'support') ----- + pluginName + "Answer the version string of the SqueakFFIPrims plugin." + 1 to: SmallInteger maxVal do: + [:i| + (Smalltalk listLoadedModule: i) + ifNil: [^self error: 'cannot find FFI plugin'] + ifNotNil: + [:moduleName| + (moduleName beginsWith: 'SqueakFFIPrims') ifTrue: + [^moduleName]]]. + "NOTREACHED"!

1 0

FFI: FFI-Tests-eem.71.mcz
by commits＠source.squeak.org 12 Mar '23

12 Mar '23

Eliot Miranda uploaded a new version of FFI-Tests to project FFI: http://source.squeak.org/FFI/FFI-Tests-eem.71.mcz ==================== Summary ==================== Name: FFI-Tests-eem.71 Author: eem Time: 11 March 2023, 5:46:13.184007 pm UUID: db60f962-7d44-48b3-bce4-734c13fe6641 Ancestors: FFI-Tests-mt.70 Update FFIPluginTests>>arm64Check now that the latest version of the plugin is ok. =============== Diff against FFI-Tests-mt.70 =============== Item was changed: ----- Method: FFIPluginTests>>arm64Check (in category 'support') ----- arm64Check + "If required, mark the current test as failure to avoid segmentation fault + due to issues in older versions of the plugin code." - "Mark the current test as failure to avoid segmentation fault due to issues in the plugin code." + (FFIPlatformDescription current isARM + and: [FFIPlatformDescription current wordSize = 8 + and: [Smalltalk vmVMMakerVersion < 3309]]) ifTrue: + [self fail: 'Not supported. Segmentation fault avoided.']! - (FFIPlatformDescription current isARM and: [FFIPlatformDescription current wordSize = 8]) - ifTrue: [self fail: 'Not supported. Segmentation fault avoided.'].!

1 0

The Trunk: Tools-eem.1192.mcz
by commits＠source.squeak.org 12 Mar '23

12 Mar '23

Eliot Miranda uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-eem.1192.mcz ==================== Summary ==================== Name: Tools-eem.1192 Author: eem Time: 11 March 2023, 2:59:37.992429 pm UUID: ec212aa6-cebb-4fc1-8d76-613cb8d786ab Ancestors: Tools-mt.1191 better category for ArchiveViewer class>>fileReaderServicesForFile:suffix: =============== Diff against Tools-mt.1191 =============== Item was changed: + ----- Method: ArchiveViewer class>>fileReaderServicesForFile:suffix: (in category 'file list services') ----- - ----- Method: ArchiveViewer class>>fileReaderServicesForFile:suffix: (in category 'fileIn/Out') ----- fileReaderServicesForFile: fullName suffix: suffix | services | services := OrderedCollection new. services add: self serviceAddToNewZip. ({'zip'.'sar'.'pr'. 'mcz'. '*'} includes: suffix) ifTrue: [services add: self serviceOpenInZipViewer. services add: self serviceExtractAll]. ^ services!

1 0

The Trunk: Morphic-mt.2098.mcz
by commits＠source.squeak.org 10 Mar '23

10 Mar '23

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.2098.mcz ==================== Summary ==================== Name: Morphic-mt.2098 Author: mt Time: 10 March 2023, 10:51:25.580811 am UUID: 756190bd-216e-ae41-b60a-4f3a32df3ec4 Ancestors: Morphic-mt.2097 Whoops... forgot about EToys' cartesian origin... =============== Diff against Morphic-mt.2097 =============== Item was changed: ----- Method: ProportionalSplitterMorph>>splitterAbove (in category 'queries - adjacent splitters') ----- splitterAbove | immediatelyAbove | immediatelyAbove := nil. self siblingSplittersDo: + [ : each | + each top < self top ifTrue: - [ : each | "Splitter y's map 0 at the bottom." - each top > self top ifTrue: [ immediatelyAbove ifNil: [ immediatelyAbove := each ] ifNotNil: + [ each top > immediatelyAbove top ifTrue: [ immediatelyAbove := each ] ] ] ]. - [ each top < immediatelyAbove top ifTrue: [ immediatelyAbove := each ] ] ] ]. ^ immediatelyAbove! Item was changed: ----- Method: ProportionalSplitterMorph>>splitterBelow (in category 'queries - adjacent splitters') ----- splitterBelow | immediatelyBelow | immediatelyBelow := nil. self siblingSplittersDo: + [ : each | each top > self top ifTrue: - [ : each | each top < self top ifTrue: [ immediatelyBelow ifNil: [ immediatelyBelow := each ] ifNotNil: + [ each top < immediatelyBelow top ifTrue: [ immediatelyBelow := each ] ] ] ]. - [ each top > immediatelyBelow top ifTrue: [ immediatelyBelow := each ] ] ] ]. ^ immediatelyBelow!

1 0

The Trunk: Morphic-mt.2097.mcz
by commits＠source.squeak.org 10 Mar '23

10 Mar '23

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.2097.mcz ==================== Summary ==================== Name: Morphic-mt.2097 Author: mt Time: 10 March 2023, 10:47:19.416811 am UUID: 685bb901-7e7e-4c4f-934f-92491a195850 Ancestors: Morphic-mt.2096 Fix similar to the recent one in #splitterLeft and #splitterRight. =============== Diff against Morphic-mt.2096 =============== Item was changed: ----- Method: ProportionalSplitterMorph>>splitterAbove (in category 'queries - adjacent splitters') ----- splitterAbove | immediatelyAbove | immediatelyAbove := nil. self siblingSplittersDo: [ : each | "Splitter y's map 0 at the bottom." + each top > self top ifTrue: - each y > self y ifTrue: [ immediatelyAbove ifNil: [ immediatelyAbove := each ] ifNotNil: + [ each top < immediatelyAbove top ifTrue: [ immediatelyAbove := each ] ] ] ]. - [ each y < immediatelyAbove y ifTrue: [ immediatelyAbove := each ] ] ] ]. ^ immediatelyAbove! Item was changed: ----- Method: ProportionalSplitterMorph>>splitterBelow (in category 'queries - adjacent splitters') ----- splitterBelow | immediatelyBelow | immediatelyBelow := nil. self siblingSplittersDo: + [ : each | each top < self top ifTrue: - [ : each | each y < self y ifTrue: [ immediatelyBelow ifNil: [ immediatelyBelow := each ] ifNotNil: + [ each top > immediatelyBelow top ifTrue: [ immediatelyBelow := each ] ] ] ]. - [ each y > immediatelyBelow y ifTrue: [ immediatelyBelow := each ] ] ] ]. ^ immediatelyBelow!

1 0

The Trunk: MorphicExtras-mt.345.mcz
by commits＠source.squeak.org 10 Mar '23

10 Mar '23

Marcel Taeumel uploaded a new version of MorphicExtras to project The Trunk: http://source.squeak.org/trunk/MorphicExtras-mt.345.mcz ==================== Summary ==================== Name: MorphicExtras-mt.345 Author: mt Time: 10 March 2023, 10:33:01.192811 am UUID: 9d4c0247-b63a-f344-9ad4-2c97741d553b Ancestors: MorphicExtras-mt.344 Complement Morphic-mt.2096 =============== Diff against MorphicExtras-mt.344 =============== Item was removed: - StringMorph subclass: #ClockMorph - instanceVariableNames: 'showSeconds show24hr' - classVariableNames: '' - poolDictionaries: '' - category: 'MorphicExtras-Demo'! Item was removed: - ----- Method: ClockMorph class>>authoringPrototype (in category 'scripting') ----- - authoringPrototype - ^ super authoringPrototype contents: Time now printString! Item was removed: - ----- Method: ClockMorph class>>descriptionForPartsBin (in category 'parts bin') ----- - descriptionForPartsBin - "Answer a description for use in parts bins." - - ^ self partName: 'Digital Clock' translatedNoop - categories: {'Just for Fun' translatedNoop} - documentation: 'A digital clock' translatedNoop! Item was removed: - ----- Method: ClockMorph class>>initialize (in category 'class initialization') ----- - initialize - - self registerInFlapsRegistry. ! Item was removed: - ----- Method: ClockMorph class>>registerInFlapsRegistry (in category 'class initialization') ----- - registerInFlapsRegistry - "Register the receiver in the system's flaps registry" - self environment - at: #Flaps - ifPresent: [:cl | cl registerQuad: {#ClockMorph, #authoringPrototype. 'Clock' translatedNoop. 'A simple digital clock' translatedNoop} - forFlapNamed: 'Supplies'. - cl registerQuad: {#ClockMorph. #authoringPrototype. 'Clock' translatedNoop. 'A simple digital clock' translatedNoop} - forFlapNamed: 'PlugIn Supplies'.]! Item was removed: - ----- Method: ClockMorph class>>unload (in category 'class initialization') ----- - unload - "Unload the receiver from global registries" - - self environment at: #Flaps ifPresent: [:cl | - cl unregisterQuadsWithReceiver: self] ! Item was removed: - ----- Method: ClockMorph>>addCustomMenuItems:hand: (in category 'menu') ----- - addCustomMenuItems: aCustomMenu hand: aHandMorph - "Add toggles for showing-seconds and display-24-hrs to the halo menu" - - "NB: intentionallyi no super call here!!" - - aCustomMenu add: 'change font' translated action: #changeFont. - - aCustomMenu addUpdating: #showingSecondsString action: #toggleShowingSeconds. - aCustomMenu addUpdating: #displaying24HourString action: #toggleShowing24hr! Item was removed: - ----- Method: ClockMorph>>balloonText (in category 'accessing') ----- - balloonText - - ^ Date current weekday, ', ', Date current printString! Item was removed: - ----- Method: ClockMorph>>initialize (in category 'initialization') ----- - initialize - "initialize the state of the receiver" - - super initialize. - - showSeconds := true. - show24hr := false. - self font: Preferences standardMenuFont emphasis: 1. - self step! Item was removed: - ----- Method: ClockMorph>>initializeToStandAlone (in category 'parts bin') ----- - initializeToStandAlone - super initializeToStandAlone. - showSeconds := false. - self font: (Preferences standardMenuFont emphasized: 1). - self step! Item was removed: - ----- Method: ClockMorph>>show24hr: (in category '24hr') ----- - show24hr: aBoolean - show24hr := aBoolean! Item was removed: - ----- Method: ClockMorph>>showSeconds: (in category 'seconds') ----- - showSeconds: aBoolean - showSeconds := aBoolean! Item was removed: - ----- Method: ClockMorph>>step (in category 'stepping and presenter') ----- - step - - | time | - super step. - time := String streamContents: [ :stream | - | t | - t := Time now. - t seconds: t asSeconds. "ignore nanoSeconds" - t - print24: (show24hr == true) - showSeconds: (showSeconds == true) - on: stream]. - self contents: time! Item was removed: - ----- Method: ClockMorph>>stepTime (in category 'stepping and presenter') ----- - stepTime - "Answer the desired time between steps in milliseconds." - - ^999! Item was removed: - ----- Method: ClockMorph>>toggleShowing24hr (in category '24hr') ----- - toggleShowing24hr - show24hr := (show24hr == true) not - ! Item was removed: - ----- Method: ClockMorph>>toggleShowingSeconds (in category 'seconds') ----- - toggleShowingSeconds - showSeconds := (showSeconds == true) not - !

1 0

The Trunk: Morphic-mt.2096.mcz
by commits＠source.squeak.org 10 Mar '23

10 Mar '23

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.2096.mcz ==================== Summary ==================== Name: Morphic-mt.2096 Author: mt Time: 10 March 2023, 10:32:31.326811 am UUID: 01b0d2b4-fd5f-6f4f-ae55-d36a0f05a72a Ancestors: Morphic-mt.2095 Move ClockMorph as important tool in the world-main docking-bar from #MorphicExtras to #Morphic package. Maybe it should even be in #Tools at some point? =============== Diff against Morphic-mt.2095 =============== Item was added: + StringMorph subclass: #ClockMorph + instanceVariableNames: 'showSeconds show24hr' + classVariableNames: '' + poolDictionaries: '' + category: 'Morphic-Demo'! Item was added: + ----- Method: ClockMorph class>>authoringPrototype (in category 'scripting') ----- + authoringPrototype + ^ super authoringPrototype contents: Time now printString! Item was added: + ----- Method: ClockMorph class>>descriptionForPartsBin (in category 'parts bin') ----- + descriptionForPartsBin + "Answer a description for use in parts bins." + + ^ self partName: 'Digital Clock' translatedNoop + categories: {'Just for Fun' translatedNoop} + documentation: 'A digital clock' translatedNoop! Item was added: + ----- Method: ClockMorph class>>initialize (in category 'class initialization') ----- + initialize + + self registerInFlapsRegistry. ! Item was added: + ----- Method: ClockMorph class>>registerInFlapsRegistry (in category 'class initialization') ----- + registerInFlapsRegistry + "Register the receiver in the system's flaps registry" + self environment + at: #Flaps + ifPresent: [:cl | cl registerQuad: {#ClockMorph, #authoringPrototype. 'Clock' translatedNoop. 'A simple digital clock' translatedNoop} + forFlapNamed: 'Supplies'. + cl registerQuad: {#ClockMorph. #authoringPrototype. 'Clock' translatedNoop. 'A simple digital clock' translatedNoop} + forFlapNamed: 'PlugIn Supplies'.]! Item was added: + ----- Method: ClockMorph class>>unload (in category 'class initialization') ----- + unload + "Unload the receiver from global registries" + + self environment at: #Flaps ifPresent: [:cl | + cl unregisterQuadsWithReceiver: self] ! Item was added: + ----- Method: ClockMorph>>addCustomMenuItems:hand: (in category 'menu') ----- + addCustomMenuItems: aCustomMenu hand: aHandMorph + "Add toggles for showing-seconds and display-24-hrs to the halo menu" + + "NB: intentionallyi no super call here!!" + + aCustomMenu add: 'change font' translated action: #changeFont. + + aCustomMenu addUpdating: #showingSecondsString action: #toggleShowingSeconds. + aCustomMenu addUpdating: #displaying24HourString action: #toggleShowing24hr! Item was added: + ----- Method: ClockMorph>>balloonText (in category 'accessing') ----- + balloonText + + ^ Date current weekday, ', ', Date current printString! Item was added: + ----- Method: ClockMorph>>initialize (in category 'initialization') ----- + initialize + "initialize the state of the receiver" + + super initialize. + + showSeconds := true. + show24hr := false. + self font: Preferences standardMenuFont emphasis: 1. + self step! Item was added: + ----- Method: ClockMorph>>initializeToStandAlone (in category 'parts bin') ----- + initializeToStandAlone + super initializeToStandAlone. + showSeconds := false. + self font: (Preferences standardMenuFont emphasized: 1). + self step! Item was added: + ----- Method: ClockMorph>>show24hr: (in category '24hr') ----- + show24hr: aBoolean + show24hr := aBoolean! Item was added: + ----- Method: ClockMorph>>showSeconds: (in category 'seconds') ----- + showSeconds: aBoolean + showSeconds := aBoolean! Item was added: + ----- Method: ClockMorph>>step (in category 'stepping and presenter') ----- + step + + | time | + super step. + time := String streamContents: [ :stream | + | t | + t := Time now. + t seconds: t asSeconds. "ignore nanoSeconds" + t + print24: (show24hr == true) + showSeconds: (showSeconds == true) + on: stream]. + self contents: time! Item was added: + ----- Method: ClockMorph>>stepTime (in category 'stepping and presenter') ----- + stepTime + "Answer the desired time between steps in milliseconds." + + ^999! Item was added: + ----- Method: ClockMorph>>toggleShowing24hr (in category '24hr') ----- + toggleShowing24hr + show24hr := (show24hr == true) not + ! Item was added: + ----- Method: ClockMorph>>toggleShowingSeconds (in category 'seconds') ----- + toggleShowingSeconds + showSeconds := (showSeconds == true) not + !

1 0

FFI: FFI-Kernel-eem.227.mcz
by commits＠source.squeak.org 10 Mar '23

10 Mar '23

Eliot Miranda uploaded a new version of FFI-Kernel to project FFI: http://source.squeak.org/FFI/FFI-Kernel-eem.227.mcz ==================== Summary ==================== Name: FFI-Kernel-eem.227 Author: eem Time: 9 March 2023, 6:18:37.991467 pm UUID: 9a37d6b3-7dc2-4d71-800b-8c5e834f88ad Ancestors: FFI-Kernel-eem.226 Fix a bad thread safety bug with ExternalStructure and ExternalType class var StructTypes. StructTypes is a WeakValueDIctionary from class name (subclass of ExternalStructure) to instance of ExternalStructureType. Because the associations in StructTypes have weak values and are the only reference in ther system to the manufactured ExternalStructureType instance, the garbage collector *will* set the association's valeu to nil sooner or later. This provides a nasty potential for the assert in ExternalUnknownType class>>#newTypeForUnknownNamed: to fail because two threads are both in the process of computing a new type via ExternalType class>>#structTypeNamed:. The fix is to have ExternalStructure maintain a strong reference to the manufactured type in a class inst var, externalType, and to void this type, and the entry in StructTypes whenever a method is added or removed from the instance side of ExternalStructure. =============== Diff against FFI-Kernel-eem.226 =============== Item was changed: ExternalObject subclass: #ExternalStructure instanceVariableNames: '' classVariableNames: 'LogAccessorSourceCode' poolDictionaries: 'ExternalTypePool FFIConstants' category: 'FFI-Kernel'! ExternalStructure class + instanceVariableNames: 'compiledSpec byteAlignment externalType'! - instanceVariableNames: 'compiledSpec byteAlignment'! !ExternalStructure commentStamp: 'eem 6/26/2019 15:26' prior: 0! An ExternalStructure is for representing external data that is - either a structure composed of different fields (a struct of C language) - or an alias for another type (like a typedef of C language) It reserves enough bytes of data for representing all the fields. The data is stored into the handle instance variable which can be of two different types: - ExternalAddress If the handle is an external address then the object described does not reside in the Smalltalk object memory. - ByteArray If the handle is a byte array then the object described resides in Smalltalk memory. Instance Variables (class side) byteAlignment: <Integer> compiledSpec: <WordArray> byteAlignment - the required alignment for the structure compiledSpec - the bit-field definiton of the structure in the ExternalType encoding understood by the VM's FFI call marshalling machinery. A specific structure is defined by subclassing ExternalStructure and specifying its #fields via a class side method. For example if we define a subclass: ExternalStructure subclass: #StructExample instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: 'garbage'. Then declare the fields like this: StructExample class compile: 'fields ^#( (name ''char*'') (color ''ulong'') )' classified: 'garbage'. It means that this type is composed of two different fields: - a string (accessed thru the field #name) - and an unsigned 32bit integer (accessed thru the field #color). It represents the following C type: struct StructExample {char *name; uint32_t color; }; The accessors for those fields can be generated automatically like this: StructExample defineFields. As can be verified in a Browser: StructExample browse. We see that name and color fields are stored sequentially in different zones of data. The total size of the structure can be verified with: StructExample byteSize = (Smalltalk wordSize + 4). An ExternalStructure can also be used for defining an alias. The fields definition must contain only 2 elements: an eventual accessor (or nil) and the type. For example, We can define a machine dependent 'unsigned long' like this: ExternalStructure subclass: #UnsignedLong instanceVariableNames: '' classVariableNames: '' poolDictionaries: '' category: 'garbage'. Then set the fields like this: UnsignedLong class compile: 'fields ^(Smalltalk wordSize=4 or: [Smalltalk platformName=''Win64'']) ifTrue: [#(nil ''ulong'')] ifFalse: [#(nil ''ulonglong'')]' classified: 'garbage'. And verify the size on current platform: UnsignedLong byteSize. Then, the class names 'UnsignedLong' and 'StructExamples' acts as a type specification. They can be used for composing other types, and for defining prototype of external functions: LibraryExample>>initMyStruct: aStructExample name: name color: anInteger <cdecl: void 'init_my_struct'( StructExample * char * UnsignedLong )> self externalCallFailed ! ExternalStructure class + instanceVariableNames: 'compiledSpec byteAlignment externalType'! - instanceVariableNames: 'compiledSpec byteAlignment'! Item was added: + ----- Method: ExternalStructure class>>addSelectorSilently:withMethod: (in category 'accessing method dictionary') ----- + addSelectorSilently: selector withMethod: compiledMethod + "Override to void the strong reference to the externalType" + self voidExternalType. + ^super addSelectorSilently: selector withMethod: compiledMethod! Item was changed: ----- Method: ExternalStructure class>>externalType (in category 'external type') ----- externalType + "Answer an external type describing the receiver as a structure. + Keep a strong reference to it so that it doesn't get garbage collected + from StructTypes immediately." + ^externalType := ExternalType structTypeNamed: self name! - "Return an external type describing the receiver as a structure" - ^ExternalType structTypeNamed: self name! Item was added: + ----- Method: ExternalStructure class>>removeSelector: (in category 'accessing method dictionary') ----- + removeSelector: selector + "Override to void the strong reference to the externalType" + self voidExternalType. + ^super removeSelector: selector! Item was added: + ----- Method: ExternalStructure class>>voidExternalType (in category 'private') ----- + voidExternalType + externalType := nil. + ExternalType voidStructTypeFor: self! Item was added: + ----- Method: ExternalType class>>voidStructTypeFor: (in category 'housekeeping') ----- + voidStructTypeFor: anExternalStructureClass + (StructTypes associationAt: anExternalStructureClass name ifAbsent: [^self]) value: nil!

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages March 2023