Export using 'slots:' API.

src/Helios-Announcements.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Announcements'!
 Object subclass: #HLAboutToChange
-	instanceVariableNames: 'actionBlock'
+	slots: {#actionBlock}
 	package: 'Helios-Announcements'!
 !HLAboutToChange commentStamp!
 I am announced whenever a change of context is about to be made, and unsaved changes could be lost.
@@ -18,7 +18,7 @@ actionBlock: aBlock
 ! !
 
 Object subclass: #HLAnnouncement
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 !HLAnnouncement commentStamp!
 I am the root of the announcement class hierarchy used in the Helios UI.!
@@ -30,7 +30,7 @@ heliosClass
 ! !
 
 HLAnnouncement subclass: #HLCodeHandled
-	instanceVariableNames: 'code'
+	slots: {#code}
 	package: 'Helios-Announcements'!
 !HLCodeHandled commentStamp!
 I am the root class of announcements emitted by `HLCodeWidget`s!
@@ -57,13 +57,13 @@ on: aCodeModel
 ! !
 
 HLCodeHandled subclass: #HLDoItExecuted
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 !HLDoItExecuted commentStamp!
 I am emitted by a `HLCodeWidget` after a DoIt has been executed.!
 
 HLAnnouncement subclass: #HLDebuggerAnnouncement
-	instanceVariableNames: 'context'
+	slots: {#context}
 	package: 'Helios-Announcements'!
 !HLDebuggerAnnouncement commentStamp!
 I am the root class of debugger announcements, and hold onto the debugged `context`.!
@@ -79,7 +79,7 @@ context: aContext
 ! !
 
 HLDebuggerAnnouncement subclass: #HLDebuggerContextSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 !HLDebuggerContextSelected commentStamp!
 I am announced when a new context is selected in a debugger, to update the user interface.!
@@ -95,27 +95,27 @@ context: aContext
 ! !
 
 HLDebuggerAnnouncement subclass: #HLDebuggerProceeded
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLDebuggerAnnouncement subclass: #HLDebuggerStepped
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLDebuggerAnnouncement subclass: #HLDebuggerWhere
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLDiveRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLEditComment
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLErrorRaised
-	instanceVariableNames: 'error'
+	slots: {#error}
 	package: 'Helios-Announcements'!
 
 !HLErrorRaised methodsFor: 'accessing'!
@@ -129,11 +129,11 @@ error: anError
 ! !
 
 HLErrorRaised subclass: #HLCompileErrorRaised
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLErrorRaised subclass: #HLParseErrorRaised
-	instanceVariableNames: 'line column message'
+	slots: {#line. #column. #message}
 	package: 'Helios-Announcements'!
 
 !HLParseErrorRaised methodsFor: 'accessing'!
@@ -163,39 +163,39 @@ message: aString
 ! !
 
 HLErrorRaised subclass: #HLUnknownVariableErrorRaised
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLClassesFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLDocumentationFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLMethodsFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLPackagesFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLProtocolsFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLFocusRequested subclass: #HLSourceCodeFocusRequested
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLInstVarAdded
-	instanceVariableNames: 'theClass variableName'
+	slots: {#theClass. #variableName}
 	package: 'Helios-Announcements'!
 
 !HLInstVarAdded methodsFor: 'accessing'!
@@ -217,7 +217,7 @@ variableName: aString
 ! !
 
 HLAnnouncement subclass: #HLItemSelected
-	instanceVariableNames: 'item'
+	slots: {#item}
 	package: 'Helios-Announcements'!
 
 !HLItemSelected methodsFor: 'accessing'!
@@ -239,27 +239,27 @@ on: anItem
 ! !
 
 HLItemSelected subclass: #HLClassSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLItemSelected subclass: #HLInstanceVariableSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLItemSelected subclass: #HLMethodSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLItemSelected subclass: #HLPackageSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLItemSelected subclass: #HLProtocolSelected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLItemUnselected
-	instanceVariableNames: 'item'
+	slots: {#item}
 	package: 'Helios-Announcements'!
 
 !HLItemUnselected methodsFor: 'accessing'!
@@ -281,15 +281,15 @@ on: anItem
 ! !
 
 HLItemUnselected subclass: #HLClassUnselected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLItemUnselected subclass: #HLPackageUnselected
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLRunTests
-	instanceVariableNames: 'testSuiteRunner'
+	slots: {#testSuiteRunner}
 	package: 'Helios-Announcements'!
 
 !HLRunTests methodsFor: 'accessing'!
@@ -311,11 +311,11 @@ on: aTestSuiteRunner
 ! !
 
 HLAnnouncement subclass: #HLSaveSourceCode
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLSearchReferences
-	instanceVariableNames: 'searchString'
+	slots: {#searchString}
 	package: 'Helios-Announcements'!
 
 !HLSearchReferences methodsFor: 'accessing'!
@@ -329,15 +329,15 @@ searchString: aString
 ! !
 
 HLAnnouncement subclass: #HLShowCommentToggled
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLShowInstanceToggled
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLShowTemplate
-	instanceVariableNames: 'template'
+	slots: {#template}
 	package: 'Helios-Announcements'!
 
 !HLShowTemplate methodsFor: 'accessing'!
@@ -351,11 +351,11 @@ template: aString
 ! !
 
 HLAnnouncement subclass: #HLSourceCodeSaved
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Announcements'!
 
 HLAnnouncement subclass: #HLTabLabelChanged
-	instanceVariableNames: 'label widget'
+	slots: {#label. #widget}
 	package: 'Helios-Announcements'!
 
 !HLTabLabelChanged methodsFor: 'accessing'!

src/Helios-Browser-Tests.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Browser-Tests'!
 TestCase subclass: #HLBrowserTest
-	instanceVariableNames: 'browser'
+	slots: {#browser}
 	package: 'Helios-Browser-Tests'!
 !HLBrowserTest commentStamp!
 Test cases for the functionality of  `HLBrowserModel`!

src/Helios-Browser.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Browser'!
 HLWidget subclass: #HLBrowser
-	instanceVariableNames: 'model packagesListWidget classesListWidget protocolsListWidget methodsListWidget sourceWidget bottomDiv'
+	slots: {#model. #packagesListWidget. #classesListWidget. #protocolsListWidget. #methodsListWidget. #sourceWidget. #bottomDiv}
 	package: 'Helios-Browser'!
 !HLBrowser commentStamp!
 I render a system browser with 4 panes (Packages, Classes, Protocols, Methods) and a source area.!
@@ -145,7 +145,7 @@ sourceWidget
 			yourself ]
 ! !
 
-HLBrowser class instanceVariableNames: 'nextId'!
+HLBrowser class slots: {#nextId}!
 
 !HLBrowser class methodsFor: 'accessing'!
 
@@ -173,7 +173,7 @@ canBeOpenAsTab
 ! !
 
 HLWidget subclass: #HLBrowserBottomWidget
-	instanceVariableNames: 'model codeWidget documentationWidget'
+	slots: {#model. #codeWidget. #documentationWidget}
 	package: 'Helios-Browser'!
 !HLBrowserBottomWidget commentStamp!
 I render the code area of a browser and optionally the documentation for the selected class.!
@@ -256,7 +256,7 @@ canHaveFocus
 ! !
 
 HLToolModel subclass: #HLBrowserModel
-	instanceVariableNames: 'showInstance showComment'
+	slots: {#showInstance. #showComment}
 	package: 'Helios-Browser'!
 
 !HLBrowserModel methodsFor: 'accessing'!
@@ -358,7 +358,7 @@ on: anEnvironment
 ! !
 
 Object subclass: #HLClassCache
-	instanceVariableNames: 'class selectorsCache overrideCache overriddenCache'
+	slots: {#class. #selectorsCache. #overrideCache. #overriddenCache}
 	package: 'Helios-Browser'!
 
 !HLClassCache methodsFor: 'accessing'!
@@ -445,7 +445,7 @@ on: aClass selectorsCache: aSelectorsCache
 ! !
 
 HLToolListWidget subclass: #HLClassesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Browser'!
 !HLClassesListWidget commentStamp!
 I render a list of classes in the selected package.!
@@ -790,7 +790,7 @@ showInstance
 ! !
 
 HLFocusableWidget subclass: #HLDocumentationWidget
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-Browser'!
 !HLDocumentationWidget commentStamp!
 I render the documentation for the selected class!
@@ -945,7 +945,7 @@ renderInheritanceOn: html
 ! !
 
 HLToolListWidget subclass: #HLMethodsListWidget
-	instanceVariableNames: 'selectorsCache'
+	slots: {#selectorsCache}
 	package: 'Helios-Browser'!
 !HLMethodsListWidget commentStamp!
 I render a list of methods for the selected protocol.!
@@ -1201,7 +1201,7 @@ isOverride: aMethod
    ^ self selectorsCache isOverride: aMethod
 ! !
 
-HLMethodsListWidget class instanceVariableNames: 'selectorsCache'!
+HLMethodsListWidget class slots: {#selectorsCache}!
 
 !HLMethodsListWidget class methodsFor: 'accessing'!
 
@@ -1210,7 +1210,7 @@ selectorsCache
 ! !
 
 HLToolListWidget subclass: #HLPackagesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Browser'!
 !HLPackagesListWidget commentStamp!
 I render a list of the system packages.!
@@ -1330,7 +1330,7 @@ renderItemLabel: aPackage on: html
 ! !
 
 HLToolListWidget subclass: #HLProtocolsListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Browser'!
 !HLProtocolsListWidget commentStamp!
 I render a list of protocols for the selected class.!
@@ -1479,7 +1479,7 @@ renderContentOn: html
 ! !
 
 Object subclass: #HLSelectorsCache
-	instanceVariableNames: 'classesCache'
+	slots: {#classesCache}
 	package: 'Helios-Browser'!
 
 !HLSelectorsCache methodsFor: 'accessing'!
@@ -1553,7 +1553,7 @@ isOverride: aMethod
     	isOverride: aMethod
 ! !
 
-HLSelectorsCache class instanceVariableNames: 'current'!
+HLSelectorsCache class slots: {#current}!
 
 !HLSelectorsCache class methodsFor: 'accessing'!
 

src/Helios-Commands-Browser.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Commands-Browser'!
 HLToolCommand subclass: #HLBrowserCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLBrowserCommand class methodsFor: 'testing'!
@@ -10,7 +10,7 @@ isValidFor: aModel
 ! !
 
 HLBrowserCommand subclass: #HLBrowserGoToCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLBrowserGoToCommand class methodsFor: 'accessing'!
@@ -30,7 +30,7 @@ isValidFor: aModel
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToClassesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToClassesCommand methodsFor: 'executing'!
@@ -50,7 +50,7 @@ label
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToDocumentationCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToDocumentationCommand methodsFor: 'executing'!
@@ -70,7 +70,7 @@ label
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToMethodsCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToMethodsCommand methodsFor: 'executing'!
@@ -90,7 +90,7 @@ label
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToPackagesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToPackagesCommand methodsFor: 'executing'!
@@ -110,7 +110,7 @@ label
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToProtocolsCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToProtocolsCommand methodsFor: 'executing'!
@@ -130,7 +130,7 @@ label
 ! !
 
 HLBrowserGoToCommand subclass: #HLGoToSourceCodeCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLGoToSourceCodeCommand methodsFor: 'executing'!
@@ -150,7 +150,7 @@ label
 ! !
 
 HLBrowserCommand subclass: #HLEditCommentCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLEditCommentCommand methodsFor: 'executing'!
@@ -176,7 +176,7 @@ label
 ! !
 
 HLBrowserCommand subclass: #HLGenerateCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 !HLGenerateCommand commentStamp!
 I am a group command used to gather all the commands generating code (`accessors`, `initialize`, etc)!
@@ -192,7 +192,7 @@ label
 ! !
 
 HLGenerateCommand subclass: #HLCategorizeUnclassifiedCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 !HLCategorizeUnclassifiedCommand commentStamp!
 I am the command used to categorize unclassified methods!
@@ -220,7 +220,7 @@ label
 ! !
 
 HLGenerateCommand subclass: #HLGenerateAccessorsCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 !HLGenerateAccessorsCommand commentStamp!
 I am the command used to generate the `getter` and the `setter` methods depending of the selected class!
@@ -255,7 +255,7 @@ label
 ! !
 
 HLGenerateCommand subclass: #HLGenerateInitializeCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 !HLGenerateInitializeCommand commentStamp!
 I am the command used to generate the `initialize` method depending of the selected class!
@@ -286,7 +286,7 @@ label
 ! !
 
 HLBrowserCommand subclass: #HLToggleCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLToggleCommand class methodsFor: 'accessing'!
@@ -300,7 +300,7 @@ label
 ! !
 
 HLToggleCommand subclass: #HLToggleClassCommentCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLToggleClassCommentCommand methodsFor: 'executing'!
@@ -320,7 +320,7 @@ label
 ! !
 
 HLToggleCommand subclass: #HLToggleClassSideCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Browser'!
 
 !HLToggleClassSideCommand methodsFor: 'executing'!

src/Helios-Commands-Core.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Commands-Core'!
 Object subclass: #HLCommand
-	instanceVariableNames: 'input'
+	slots: {#input}
 	package: 'Helios-Commands-Core'!
 
 !HLCommand methodsFor: 'accessing'!
@@ -163,7 +163,7 @@ isValidFor: aModel
 ! !
 
 HLCommand subclass: #HLCloseTabCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLCloseTabCommand methodsFor: 'executing'!
@@ -183,7 +183,7 @@ label
 ! !
 
 HLCommand subclass: #HLModelCommand
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-Commands-Core'!
 
 !HLModelCommand methodsFor: 'accessing'!
@@ -220,7 +220,7 @@ registerOn: aBinding for: aModel
 ! !
 
 HLCommand subclass: #HLOpenCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLOpenCommand class methodsFor: 'accessing'!
@@ -234,7 +234,7 @@ label
 ! !
 
 HLOpenCommand subclass: #HLOpenBrowserCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLOpenBrowserCommand methodsFor: 'executing'!
@@ -254,7 +254,7 @@ label
 ! !
 
 HLOpenCommand subclass: #HLOpenSUnitCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLOpenSUnitCommand methodsFor: 'executing'!
@@ -274,7 +274,7 @@ label
 ! !
 
 HLOpenCommand subclass: #HLOpenWorkspaceCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLOpenWorkspaceCommand methodsFor: 'executing'!
@@ -294,7 +294,7 @@ label
 ! !
 
 HLCommand subclass: #HLSwitchTabCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLSwitchTabCommand methodsFor: 'accessing'!
@@ -334,7 +334,7 @@ label
 ! !
 
 HLCommand subclass: #HLViewCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Core'!
 
 !HLViewCommand class methodsFor: 'accessing'!

src/Helios-Commands-SUnit.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Commands-SUnit'!
 HLToolCommand subclass: #HLSUnitCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitCommand commentStamp!
 I group the commands pertaining to Helios-SUnit (`HLSUnitModel`)!
@@ -12,7 +12,7 @@ isValidFor: aModel
 ! !
 
 HLSUnitCommand subclass: #HLSUnitInvertSelectedCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitInvertSelectedCommand commentStamp!
 I group the commands that invert selections!
@@ -28,7 +28,7 @@ label
 ! !
 
 HLSUnitInvertSelectedCommand subclass: #HLSUnitInvertSelectedClassesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitInvertSelectedClassesCommand commentStamp!
 Invert the currently selected classes on a `HLSUnitModel`!
@@ -62,7 +62,7 @@ label
 ! !
 
 HLSUnitInvertSelectedCommand subclass: #HLSUnitInvertSelectedPackagesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitInvertSelectedPackagesCommand commentStamp!
 Invert the currently selected packages on a `HLSUnitModel`!
@@ -96,7 +96,7 @@ label
 ! !
 
 HLSUnitCommand subclass: #HLSUnitRunTests
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitRunTests commentStamp!
 Run the test cases in the currently selected classes on a `HLSUnitModel`!
@@ -124,7 +124,7 @@ label
 ! !
 
 HLSUnitCommand subclass: #HLSUnitSelectAllCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitSelectAllCommand commentStamp!
 I group the select all commands!
@@ -140,7 +140,7 @@ label
 ! !
 
 HLSUnitSelectAllCommand subclass: #HLSUnitSelectAllClassesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitSelectAllClassesCommand commentStamp!
 Select all available test classes based on what packages are selected on a `HLSUnitModel`!
@@ -174,7 +174,7 @@ label
 ! !
 
 HLSUnitSelectAllCommand subclass: #HLSUnitSelectAllPackagesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-SUnit'!
 !HLSUnitSelectAllPackagesCommand commentStamp!
 Select all packages with test cases on a `HLSUnitModel`!

src/Helios-Commands-Tools.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Commands-Tools'!
 HLModelCommand subclass: #HLToolCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLToolCommand methodsFor: 'accessing'!
@@ -24,7 +24,7 @@ isValidFor: aModel
 ! !
 
 HLToolCommand subclass: #HLBrowseMethodCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLBrowseMethodCommand methodsFor: 'accessing'!
@@ -56,7 +56,7 @@ isValidFor: aModel
 ! !
 
 HLToolCommand subclass: #HLCommitPackageCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLCommitPackageCommand methodsFor: 'accessing'!
@@ -108,7 +108,7 @@ label
 ! !
 
 HLToolCommand subclass: #HLCopyCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLCopyCommand class methodsFor: 'accessing'!
@@ -122,7 +122,7 @@ label
 ! !
 
 HLCopyCommand subclass: #HLCopyClassCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLCopyClassCommand methodsFor: 'accessing'!
@@ -172,7 +172,7 @@ menuLabel
 ! !
 
 HLToolCommand subclass: #HLFindCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLFindCommand class methodsFor: 'accessing'!
@@ -186,7 +186,7 @@ label
 ! !
 
 HLFindCommand subclass: #HLFindClassCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLFindClassCommand methodsFor: 'accessing'!
@@ -226,7 +226,7 @@ label
 ! !
 
 HLFindCommand subclass: #HLFindReferencesCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLFindReferencesCommand methodsFor: 'accessing'!
@@ -279,7 +279,7 @@ label
 ! !
 
 HLToolCommand subclass: #HLMoveToCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveToCommand class methodsFor: 'accessing'!
@@ -293,7 +293,7 @@ label
 ! !
 
 HLMoveToCommand subclass: #HLMoveClassToCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveClassToCommand methodsFor: 'testing'!
@@ -313,7 +313,7 @@ label
 ! !
 
 HLMoveClassToCommand subclass: #HLMoveClassToPackageCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveClassToPackageCommand methodsFor: 'accessing'!
@@ -361,7 +361,7 @@ menuLabel
 ! !
 
 HLMoveToCommand subclass: #HLMoveMethodToCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveMethodToCommand methodsFor: 'accessing'!
@@ -387,7 +387,7 @@ label
 ! !
 
 HLMoveMethodToCommand subclass: #HLMoveMethodToClassCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveMethodToClassCommand methodsFor: 'accessing'!
@@ -431,7 +431,7 @@ menuLabel
 ! !
 
 HLMoveMethodToCommand subclass: #HLMoveMethodToProtocolCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLMoveMethodToProtocolCommand methodsFor: 'accessing'!
@@ -475,7 +475,7 @@ menuLabel
 ! !
 
 HLToolCommand subclass: #HLRemoveCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRemoveCommand class methodsFor: 'accessing'!
@@ -489,7 +489,7 @@ label
 ! !
 
 HLRemoveCommand subclass: #HLRemoveClassCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRemoveClassCommand methodsFor: 'accessing'!
@@ -525,7 +525,7 @@ menuLabel
 ! !
 
 HLRemoveCommand subclass: #HLRemoveMethodCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRemoveMethodCommand methodsFor: 'accessing'!
@@ -561,7 +561,7 @@ menuLabel
 ! !
 
 HLRemoveCommand subclass: #HLRemoveProtocolCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRemoveProtocolCommand methodsFor: 'accessing'!
@@ -597,7 +597,7 @@ menuLabel
 ! !
 
 HLToolCommand subclass: #HLRenameCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRenameCommand class methodsFor: 'accessing'!
@@ -611,7 +611,7 @@ label
 ! !
 
 HLRenameCommand subclass: #HLRenameClassCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRenameClassCommand methodsFor: 'accessing'!
@@ -661,7 +661,7 @@ menuLabel
 ! !
 
 HLRenameCommand subclass: #HLRenamePackageCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRenamePackageCommand methodsFor: 'accessing'!
@@ -711,7 +711,7 @@ menuLabel
 ! !
 
 HLRenameCommand subclass: #HLRenameProtocolCommand
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Commands-Tools'!
 
 !HLRenameProtocolCommand methodsFor: 'accessing'!

src/Helios-Core.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Core'!
 Object subclass: #HLModel
-	instanceVariableNames: 'announcer environment'
+	slots: {#announcer. #environment}
 	package: 'Helios-Core'!
 !HLModel commentStamp!
 I am the abstract superclass of all models of Helios.
@@ -62,7 +62,7 @@ isToolModel
 ! !
 
 HLModel subclass: #HLFinder
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Core'!
 !HLFinder commentStamp!
 I am the `Finder` service handler of Helios.
@@ -92,7 +92,7 @@ findString: aString
 ! !
 
 HLModel subclass: #HLToolModel
-	instanceVariableNames: 'selectedClass selectedPackage selectedProtocol selectedSelector'
+	slots: {#selectedClass. #selectedPackage. #selectedProtocol. #selectedSelector}
 	package: 'Helios-Core'!
 !HLToolModel commentStamp!
 I am a model specific to package and class manipulation. All browsers should either use me or a subclass as their model.
@@ -482,7 +482,7 @@ on: anEnvironment
 ! !
 
 Object subclass: #HLProgressHandler
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Core'!
 !HLProgressHandler commentStamp!
 I am a specific progress handler for Helios, displaying progresses in a modal window.!
@@ -497,7 +497,7 @@ do: aBlock on: aCollection displaying: aString
 ! !
 
 Widget subclass: #HLWidget
-	instanceVariableNames: 'wrapper'
+	slots: {#wrapper}
 	package: 'Helios-Core'!
 !HLWidget commentStamp!
 I am the abstract superclass of all Helios widgets.
@@ -687,7 +687,7 @@ canBeOpenAsTab
 ! !
 
 HLWidget subclass: #HLFocusableWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Core'!
 !HLFocusableWidget commentStamp!
 I am a widget that can be focused.
@@ -741,7 +741,7 @@ hasFocus
 ! !
 
 HLFocusableWidget subclass: #HLListWidget
-	instanceVariableNames: 'items selectedItem'
+	slots: {#items. #selectedItem}
 	package: 'Helios-Core'!
 
 !HLListWidget methodsFor: 'accessing'!
@@ -930,7 +930,7 @@ renderListOn: html
 ! !
 
 HLListWidget subclass: #HLNavigationListWidget
-	instanceVariableNames: 'previous next'
+	slots: {#previous. #next}
 	package: 'Helios-Core'!
 
 !HLNavigationListWidget methodsFor: 'accessing'!
@@ -976,7 +976,7 @@ setupKeyBindings
 ! !
 
 HLNavigationListWidget subclass: #HLToolListWidget
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-Core'!
 
 !HLToolListWidget methodsFor: 'accessing'!
@@ -1105,7 +1105,7 @@ on: aModel
 ! !
 
 HLListWidget subclass: #HLTabListWidget
-	instanceVariableNames: 'callback'
+	slots: {#callback}
 	package: 'Helios-Core'!
 !HLTabListWidget commentStamp!
 I am a widget used to display a list of helios tabs.
@@ -1138,7 +1138,7 @@ renderItemLabel: aTab on: html
 ! !
 
 HLWidget subclass: #HLInformationWidget
-	instanceVariableNames: 'informationString'
+	slots: {#informationString}
 	package: 'Helios-Core'!
 !HLInformationWidget commentStamp!
 I display an information dialog.
@@ -1183,7 +1183,7 @@ renderContentOn: html
 ! !
 
 HLWidget subclass: #HLManager
-	instanceVariableNames: 'tabsWidget environment history announcer rendered'
+	slots: {#tabsWidget. #environment. #history. #announcer. #rendered}
 	package: 'Helios-Core'!
 !HLManager commentStamp!
 HLManager is the entry point Class of Helios.
@@ -1438,7 +1438,7 @@ registerTranscript
 	self environment registerTranscript: HLTranscriptHandler
 ! !
 
-HLManager class instanceVariableNames: 'current'!
+HLManager class slots: {#current}!
 
 !HLManager class methodsFor: 'accessing'!
 
@@ -1466,7 +1466,7 @@ new
 ! !
 
 HLWidget subclass: #HLModalWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Core'!
 !HLModalWidget commentStamp!
 I implement an abstract modal widget.!
@@ -1525,7 +1525,7 @@ setupKeyBindings
 ! !
 
 HLModalWidget subclass: #HLConfirmationWidget
-	instanceVariableNames: 'cancelButtonLabel confirmButtonLabel confirmationString actionBlock cancelBlock'
+	slots: {#cancelButtonLabel. #confirmButtonLabel. #confirmationString. #actionBlock. #cancelBlock}
 	package: 'Helios-Core'!
 !HLConfirmationWidget commentStamp!
 I display confirmation dialog. 
@@ -1615,7 +1615,7 @@ renderMainOn: html
 ! !
 
 HLConfirmationWidget subclass: #HLRequestWidget
-	instanceVariableNames: 'input multiline value'
+	slots: {#input. #multiline. #value}
 	package: 'Helios-Core'!
 !HLRequestWidget commentStamp!
 I display a modal window requesting user input.
@@ -1684,7 +1684,7 @@ isMultiline
 ! !
 
 HLModalWidget subclass: #HLProgressWidget
-	instanceVariableNames: 'progressBars visible'
+	slots: {#progressBars. #visible}
 	package: 'Helios-Core'!
 !HLProgressWidget commentStamp!
 I am a widget used to display progress modal dialogs.
@@ -1762,7 +1762,7 @@ isVisible
 	^ visible ifNil: [ false ]
 ! !
 
-HLProgressWidget class instanceVariableNames: 'default'!
+HLProgressWidget class slots: {#default}!
 
 !HLProgressWidget class methodsFor: 'accessing'!
 
@@ -1771,7 +1771,7 @@ default
 ! !
 
 HLModalWidget subclass: #HLTabSelectionWidget
-	instanceVariableNames: 'tabs tabList selectedTab selectCallback cancelCallback confirmCallback'
+	slots: {#tabs. #tabList. #selectedTab. #selectCallback. #cancelCallback. #confirmCallback}
 	package: 'Helios-Core'!
 !HLTabSelectionWidget commentStamp!
 I am a modal window used to select or create tabs.!
@@ -1902,7 +1902,7 @@ tabList
 ! !
 
 HLWidget subclass: #HLProgressBarWidget
-	instanceVariableNames: 'label parent workBlock collection bar'
+	slots: {#label. #parent. #workBlock. #collection. #bar}
 	package: 'Helios-Core'!
 !HLProgressBarWidget commentStamp!
 I am a widget used to display a progress bar while iterating over a collection.!
@@ -1980,7 +1980,7 @@ renderContentOn: html
 				style: 'width: 0%' ]
 ! !
 
-HLProgressBarWidget class instanceVariableNames: 'default'!
+HLProgressBarWidget class slots: {#default}!
 
 !HLProgressBarWidget class methodsFor: 'accessing'!
 
@@ -1989,7 +1989,7 @@ default
 ! !
 
 HLWidget subclass: #HLSpotlightWidget
-	instanceVariableNames: 'input'
+	slots: {#input}
 	package: 'Helios-Core'!
 
 !HLSpotlightWidget methodsFor: 'accessing'!
@@ -2036,7 +2036,7 @@ renderContentOn: html
 ! !
 
 HLWidget subclass: #HLTabWidget
-	instanceVariableNames: 'widget label root'
+	slots: {#widget. #label. #root}
 	package: 'Helios-Core'!
 !HLTabWidget commentStamp!
 I am a widget specialized into building another widget as an Helios tab.
@@ -2161,7 +2161,7 @@ on: aWidget labelled: aString
 ! !
 
 HLWidget subclass: #HLTabsWidget
-	instanceVariableNames: 'tabs activeTab history selectionDisabled spotlight'
+	slots: {#tabs. #activeTab. #history. #selectionDisabled. #spotlight}
 	package: 'Helios-Core'!
 
 !HLTabsWidget methodsFor: 'accessing'!
@@ -2376,10 +2376,10 @@ isSelectionDisabled
 	^ selectionDisabled ifNil: [ false ]
 ! !
 
-HLTabsWidget class instanceVariableNames: 'current'!
+HLTabsWidget class slots: {#current}!
 
 HLWidget subclass: #HLWelcomeWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Core'!
 
 !HLWelcomeWidget methodsFor: 'accessing'!

src/Helios-Debugger.st

@@ -1,7 +1,7 @@
 Smalltalk createPackage: 'Helios-Debugger'!
 (Smalltalk packageAt: 'Helios-Debugger' ifAbsent: [ self error: 'Package not created: Helios-Debugger' ]) imports: {'amber/core/Compiler-Interpreter'}!
 Object subclass: #HLContextInspectorDecorator
-	instanceVariableNames: 'context'
+	slots: {#context}
 	package: 'Helios-Debugger'!
 
 !HLContextInspectorDecorator methodsFor: 'accessing'!
@@ -51,7 +51,7 @@ on: aContext
 ! !
 
 HLFocusableWidget subclass: #HLDebugger
-	instanceVariableNames: 'model stackListWidget codeWidget inspectorWidget'
+	slots: {#model. #stackListWidget. #codeWidget. #inspectorWidget}
 	package: 'Helios-Debugger'!
 !HLDebugger commentStamp!
 I am the main widget for the Helios debugger.!
@@ -183,7 +183,7 @@ on: anError
 ! !
 
 HLCodeModel subclass: #HLDebuggerCodeModel
-	instanceVariableNames: 'debuggerModel'
+	slots: {#debuggerModel}
 	package: 'Helios-Debugger'!
 
 !HLDebuggerCodeModel methodsFor: 'accessing'!
@@ -206,7 +206,7 @@ doIt: aString
 ! !
 
 HLBrowserCodeWidget subclass: #HLDebuggerCodeWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Debugger'!
 
 !HLDebuggerCodeWidget methodsFor: 'accessing'!
@@ -286,7 +286,7 @@ renderOn: html
 ! !
 
 HLToolModel subclass: #HLDebuggerModel
-	instanceVariableNames: 'rootContext debugger error'
+	slots: {#rootContext. #debugger. #error}
 	package: 'Helios-Debugger'!
 !HLDebuggerModel commentStamp!
 I am a model for debugging Amber code in Helios.
@@ -424,7 +424,7 @@ on: anError
 ! !
 
 Object subclass: #HLErrorHandler
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Debugger'!
 
 !HLErrorHandler methodsFor: 'error handling'!
@@ -462,7 +462,7 @@ onErrorHandled
 ! !
 
 HLToolListWidget subclass: #HLStackListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Debugger'!
 
 !HLStackListWidget methodsFor: 'accessing'!

src/Helios-Exceptions.st

@@ -1,12 +1,12 @@
 Smalltalk createPackage: 'Helios-Exceptions'!
 Error subclass: #HLError
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Exceptions'!
 !HLError commentStamp!
 I am the abstract superclass of all Helios-specific errors.!
 
 HLError subclass: #HLChangeForbidden
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Exceptions'!
 !HLChangeForbidden commentStamp!
 I get signaled when a (often user) requested change is forbidden. A confirmation message can then be displayed to the user.
@@ -14,7 +14,7 @@ I get signaled when a (often user) requested change is forbidden. A confirmation
 See `HLModel >> withChangesDo:`.!
 
 HLError subclass: #HLListItemNotFound
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Exceptions'!
 !HLListItemNotFound commentStamp!
 I get signaled by a `HLListWidget` when a non-existing item in the list is activated.!

src/Helios-Helpers.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Helpers'!
 Object subclass: #HLClassifier
-	instanceVariableNames: 'next method'
+	slots: {#next. #method}
 	package: 'Helios-Helpers'!
 !HLClassifier commentStamp!
 I am an abstract class implementing a link in a `chain of responsibility` pattern.
@@ -44,7 +44,7 @@ classify
 ! !
 
 HLClassifier subclass: #HLAccessorClassifier
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Helpers'!
 !HLAccessorClassifier commentStamp!
 I am a classifier checking the method selector matches an instance variable name.!
@@ -69,7 +69,7 @@ doClassify
 ! !
 
 HLClassifier subclass: #HLImplementorClassifier
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Helpers'!
 !HLImplementorClassifier commentStamp!
 I am a classifier checking the other implementations of the same selector and choose the protocol the most populated.!
@@ -91,7 +91,7 @@ doClassify
 ! !
 
 HLClassifier subclass: #HLPrefixClassifier
-	instanceVariableNames: 'prefixMapping'
+	slots: {#prefixMapping}
 	package: 'Helios-Helpers'!
 !HLPrefixClassifier commentStamp!
 I am classifier checking the method selector to know if it begins with a known prefix.!
@@ -133,7 +133,7 @@ doClassify
 ! !
 
 HLClassifier subclass: #HLSuperclassClassifier
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Helpers'!
 !HLSuperclassClassifier commentStamp!
 I am a classifier checking the superclass chain to find a matching selector.!
@@ -171,7 +171,7 @@ doClassify
 ! !
 
 Object subclass: #HLGenerationOutput
-	instanceVariableNames: 'sourceCodes protocol targetClass'
+	slots: {#sourceCodes. #protocol. #targetClass}
 	package: 'Helios-Helpers'!
 !HLGenerationOutput commentStamp!
 I am a simple data object used to store the result of a generation process.!
@@ -226,7 +226,7 @@ compile
 ! !
 
 Object subclass: #HLMethodClassifier
-	instanceVariableNames: 'firstClassifier'
+	slots: {#firstClassifier}
 	package: 'Helios-Helpers'!
 !HLMethodClassifier commentStamp!
 I am in charge of categorizing methods following this strategy:
@@ -272,7 +272,7 @@ classifyAll: aCollectionOfMethods
 ! !
 
 Object subclass: #HLMethodGenerator
-	instanceVariableNames: 'output'
+	slots: {#output}
 	package: 'Helios-Helpers'!
 !HLMethodGenerator commentStamp!
 I am the abstract super class of the method generators.
@@ -304,7 +304,7 @@ generate
 ! !
 
 HLMethodGenerator subclass: #HLAccessorsGenerator
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Helpers'!
 !HLAccessorsGenerator commentStamp!
 I am a generator used to compile the getters/setters of a class.!
@@ -357,7 +357,7 @@ generate
 ! !
 
 HLMethodGenerator subclass: #HLInitializeGenerator
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Helpers'!
 !HLInitializeGenerator commentStamp!
 I am used to double-dispatch the `initialize` method(s) generation. I am a disposable object.
@@ -412,7 +412,7 @@ generate
 ! !
 
 Object subclass: #HLMethodSourceCode
-	instanceVariableNames: 'selector sourceCode'
+	slots: {#selector. #sourceCode}
 	package: 'Helios-Helpers'!
 !HLMethodSourceCode commentStamp!
 I am a simple data object keeping track of the information about a method that will be compiled at the end of the generation process.!
@@ -436,7 +436,7 @@ sourceCode: aString
 ! !
 
 Object subclass: #HLPackageCommitErrorHelper
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-Helpers'!
 
 !HLPackageCommitErrorHelper methodsFor: 'accessing'!

src/Helios-Inspector.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Inspector'!
 HLNavigationListWidget subclass: #HLInspectorDisplayWidget
-	instanceVariableNames: 'inspector'
+	slots: {#inspector}
 	package: 'Helios-Inspector'!
 
 !HLInspectorDisplayWidget methodsFor: 'accessing'!
@@ -34,7 +34,7 @@ selectionDisplayString
 ! !
 
 HLModel subclass: #HLInspectorModel
-	instanceVariableNames: 'inspectee code variables label selection'
+	slots: {#inspectee. #code. #variables. #label. #selection}
 	package: 'Helios-Inspector'!
 !HLInspectorModel commentStamp!
 I am the model of the Helios inspector `HLInspectorWidget`.
@@ -118,7 +118,7 @@ on: anEnvironment
 ! !
 
 HLNavigationListWidget subclass: #HLInspectorVariablesWidget
-	instanceVariableNames: 'announcer inspector list diveButton'
+	slots: {#announcer. #inspector. #list. #diveButton}
 	package: 'Helios-Inspector'!
 
 !HLInspectorVariablesWidget methodsFor: 'accessing'!
@@ -202,7 +202,7 @@ renderHeadOn: html
 ! !
 
 HLWidget subclass: #HLInspectorWidget
-	instanceVariableNames: 'model variablesWidget displayWidget codeWidget'
+	slots: {#model. #variablesWidget. #displayWidget. #codeWidget}
 	package: 'Helios-Inspector'!
 
 !HLInspectorWidget methodsFor: 'accessing'!
@@ -372,7 +372,7 @@ renderContentOn: html
 ! !
 
 HLInspectorWidget subclass: #HLInspector
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Inspector'!
 
 !HLInspector methodsFor: 'actions'!
@@ -394,7 +394,7 @@ renderContentOn: html
 	self variablesWidget focus
 ! !
 
-HLInspector class instanceVariableNames: 'inspectors'!
+HLInspector class slots: {#inspectors}!
 
 !HLInspector class methodsFor: 'accessing'!
 

src/Helios-KeyBindings.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-KeyBindings'!
 Object subclass: #HLBinding
-	instanceVariableNames: 'key label'
+	slots: {#key. #label}
 	package: 'Helios-KeyBindings'!
 !HLBinding commentStamp!
 I am the abstract representation of a keybinding in Helios. My instances hold a key (integer value) and a label. 
@@ -73,7 +73,7 @@ on: anInteger labelled: aString
 ! !
 
 HLBinding subclass: #HLBindingAction
-	instanceVariableNames: 'command'
+	slots: {#command}
 	package: 'Helios-KeyBindings'!
 !HLBindingAction commentStamp!
 My instances are the leafs of the binding tree. They evaluate actions through commands, instances of concrete subclasses of `HLCommand`.
@@ -139,7 +139,7 @@ isActive
 ! !
 
 HLBinding subclass: #HLBindingGroup
-	instanceVariableNames: 'bindings'
+	slots: {#bindings}
 	package: 'Helios-KeyBindings'!
 !HLBindingGroup commentStamp!
 My instances hold other bindings, either actions or groups, and do not have actions by themselves.
@@ -219,7 +219,7 @@ isActive
 ! !
 
 HLWidget subclass: #HLBindingActionInputWidget
-	instanceVariableNames: 'input callback status wrapper ghostText message inputCompletion defaultValue messageTag'
+	slots: {#input. #callback. #status. #wrapper. #ghostText. #message. #inputCompletion. #defaultValue. #messageTag}
 	package: 'Helios-KeyBindings'!
 !HLBindingActionInputWidget commentStamp!
 My instances are built when a `HLBindingAction` that requires user input is applied.!
@@ -339,7 +339,7 @@ renderOn: html
 ! !
 
 Object subclass: #HLKeyBinder
-	instanceVariableNames: 'modifierKey helper bindings selectedBinding'
+	slots: {#modifierKey. #helper. #bindings. #selectedBinding}
 	package: 'Helios-KeyBindings'!
 !HLKeyBinder commentStamp!
 My `current` instance holds keybindings for Helios actions and evaluate them.
@@ -502,7 +502,7 @@ systemIsMac
 	^ navigator platform match: 'Mac'
 ! !
 
-HLKeyBinder class instanceVariableNames: 'current'!
+HLKeyBinder class slots: {#current}!
 
 !HLKeyBinder class methodsFor: 'instance creation'!
 
@@ -515,7 +515,7 @@ new
 ! !
 
 HLWidget subclass: #HLKeyBinderHelperWidget
-	instanceVariableNames: 'keyBinder'
+	slots: {#keyBinder}
 	package: 'Helios-KeyBindings'!
 !HLKeyBinderHelperWidget commentStamp!
 I am the widget responsible for displaying active keybindings in a bar at the bottom of the window. Each keybinding is an instance of `HLBinding`. 
@@ -638,7 +638,7 @@ on: aKeyBinder
 ! !
 
 Object subclass: #HLRepeatedKeyDownHandler
-	instanceVariableNames: 'repeatInterval delay interval keyBindings widget keyDown'
+	slots: {#repeatInterval. #delay. #interval. #keyBindings. #widget. #keyDown}
 	package: 'Helios-KeyBindings'!
 !HLRepeatedKeyDownHandler commentStamp!
 I am responsible for handling repeated key down actions for widgets.

src/Helios-Layout.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Layout'!
 HLWidget subclass: #HLContainer
-	instanceVariableNames: 'splitter'
+	slots: {#splitter}
 	package: 'Helios-Layout'!
 
 !HLContainer methodsFor: 'accessing'!
@@ -30,7 +30,7 @@ with: aSplitter
 ! !
 
 Widget subclass: #HLSplitter
-	instanceVariableNames: 'firstWidget secondWidget firstPane secondPane splitter'
+	slots: {#firstWidget. #secondWidget. #firstPane. #secondPane. #splitter}
 	package: 'Helios-Layout'!
 
 !HLSplitter methodsFor: 'accessing'!
@@ -92,7 +92,7 @@ with: aWidget with: anotherWidget
 ! !
 
 HLSplitter subclass: #HLHorizontalSplitter
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Layout'!
 
 !HLHorizontalSplitter methodsFor: 'accessing'!
@@ -143,7 +143,7 @@ setupSplitter
 ! !
 
 HLSplitter subclass: #HLVerticalSplitter
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Layout'!
 
 !HLVerticalSplitter methodsFor: 'accessing'!

src/Helios-References.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-References'!
 Object subclass: #HLMethodReference
-	instanceVariableNames: 'selector methodClass'
+	slots: {#selector. #methodClass}
 	package: 'Helios-References'!
 
 !HLMethodReference methodsFor: 'accessing'!
@@ -46,7 +46,7 @@ on: aCompiledMethod
 ! !
 
 HLWidget subclass: #HLReferences
-	instanceVariableNames: 'model sendersListWidget implementorsListWidget classReferencesListWidget regexpListWidget sourceCodeWidget'
+	slots: {#model. #sendersListWidget. #implementorsListWidget. #classReferencesListWidget. #regexpListWidget. #sourceCodeWidget}
 	package: 'Helios-References'!
 
 !HLReferences methodsFor: 'accessing'!
@@ -143,7 +143,7 @@ canBeOpenAsTab
 ! !
 
 HLToolListWidget subclass: #HLReferencesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-References'!
 
 !HLReferencesListWidget methodsFor: 'accessing'!
@@ -205,7 +205,7 @@ on: aModel
 ! !
 
 HLReferencesListWidget subclass: #HLClassReferencesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-References'!
 
 !HLClassReferencesListWidget methodsFor: 'accessing'!
@@ -223,7 +223,7 @@ onSearchReferences: aString
 ! !
 
 HLReferencesListWidget subclass: #HLImplementorsListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-References'!
 
 !HLImplementorsListWidget methodsFor: 'accessing'!
@@ -241,7 +241,7 @@ onSearchReferences: aString
 ! !
 
 HLReferencesListWidget subclass: #HLRegexpListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-References'!
 
 !HLRegexpListWidget methodsFor: 'accessing'!
@@ -259,7 +259,7 @@ onSearchReferences: aString
 ! !
 
 HLReferencesListWidget subclass: #HLSendersListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-References'!
 
 !HLSendersListWidget methodsFor: 'accessing'!
@@ -277,7 +277,7 @@ onSearchReferences: aString
 ! !
 
 HLToolModel subclass: #HLReferencesModel
-	instanceVariableNames: 'methodsCache classesAndMetaclassesCache'
+	slots: {#methodsCache. #classesAndMetaclassesCache}
 	package: 'Helios-References'!
 
 !HLReferencesModel methodsFor: 'accessing'!

src/Helios-SUnit-Tests.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-SUnit-Tests'!
 TestCase subclass: #HLSUnitModelTest
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-SUnit-Tests'!
 !HLSUnitModelTest commentStamp!
 Test cases for the functionality of  `HLSUnitModel`!

src/Helios-SUnit.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-SUnit'!
 HLToolListWidget subclass: #HLMultiSelectToolListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLMultiSelectToolListWidget commentStamp!
 This is a list that handles multiple selection!
@@ -60,7 +60,7 @@ isSelected: anObject
 ! !
 
 HLMultiSelectToolListWidget subclass: #HLSUnitClassesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLSUnitClassesListWidget commentStamp!
 I display a list of  classes (subclasses of `TestCase`).!
@@ -181,7 +181,7 @@ isSelected: anObject
 ! !
 
 HLMultiSelectToolListWidget subclass: #HLSUnitPackagesListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLSUnitPackagesListWidget commentStamp!
 I display a list of packages for which unit tests are associated (packages containing subclasses of `TestCase`).!
@@ -287,7 +287,7 @@ isSelected: anObject
 ! !
 
 HLWidget subclass: #HLSUnit
-	instanceVariableNames: 'model packagesListWidget classesListWidget resultWidget failuresWidget errorsWidget'
+	slots: {#model. #packagesListWidget. #classesListWidget. #resultWidget. #failuresWidget. #errorsWidget}
 	package: 'Helios-SUnit'!
 !HLSUnit commentStamp!
 I am the main widget for running unit tests in Helios.
@@ -399,7 +399,7 @@ canBeOpenAsTab
 ! !
 
 HLModel subclass: #HLSUnitModel
-	instanceVariableNames: 'selectedPackages selectedClasses testResult currentSuite'
+	slots: {#selectedPackages. #selectedClasses. #testResult. #currentSuite}
 	package: 'Helios-SUnit'!
 !HLSUnitModel commentStamp!
 I am the model for running unit tests in Helios.
@@ -527,7 +527,7 @@ onResultAnnouncement: announcement
 ! !
 
 HLToolListWidget subclass: #HLSUnitResultListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLSUnitResultListWidget commentStamp!
 I group the lists that display test results!
@@ -564,7 +564,7 @@ reselectItem: anObject
 ! !
 
 HLSUnitResultListWidget subclass: #HLSUnitErrorsListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLSUnitErrorsListWidget commentStamp!
 I display a list of tests that have errors!
@@ -580,7 +580,7 @@ label
 ! !
 
 HLSUnitResultListWidget subclass: #HLSUnitFailuresListWidget
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-SUnit'!
 !HLSUnitFailuresListWidget commentStamp!
 I display a list of tests that have failures!
@@ -596,7 +596,7 @@ label
 ! !
 
 HLWidget subclass: #HLSUnitResultStatus
-	instanceVariableNames: 'model'
+	slots: {#model}
 	package: 'Helios-SUnit'!
 !HLSUnitResultStatus commentStamp!
 I display the status of the previous test run
@@ -676,7 +676,7 @@ renderContentOn: html
 ! !
 
 HLWidget subclass: #HLSUnitResults
-	instanceVariableNames: 'model progressBarWidget resultStatusWidget'
+	slots: {#model. #progressBarWidget. #resultStatusWidget}
 	package: 'Helios-SUnit'!
 !HLSUnitResults commentStamp!
 I am the widget that displays the test results for a previous test run in Helios.

src/Helios-Transcript.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Transcript'!
 HLWidget subclass: #HLTranscript
-	instanceVariableNames: 'textarea'
+	slots: {#textarea}
 	package: 'Helios-Transcript'!
 !HLTranscript commentStamp!
 I am a widget responsible for displaying transcript contents.
@@ -54,7 +54,7 @@ renderOn: html
 ! !
 
 Object subclass: #HLTranscriptHandler
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Transcript'!
 !HLTranscriptHandler commentStamp!
 I handle transcript events, dispatching them to all instances of `HLTranscript`.
@@ -63,7 +63,7 @@ I handle transcript events, dispatching them to all instances of `HLTranscript`.
 
 Use the class-side method `#register:` to add transcript instances.!
 
-HLTranscriptHandler class instanceVariableNames: 'transcripts'!
+HLTranscriptHandler class slots: {#transcripts}!
 
 !HLTranscriptHandler class methodsFor: 'accessing'!
 

src/Helios-Workspace-Tests.st

@@ -1,6 +1,6 @@
 Smalltalk createPackage: 'Helios-Workspace-Tests'!
 TestCase subclass: #HLCodeWidgetTest
-	instanceVariableNames: ''
+	slots: {}
 	package: 'Helios-Workspace-Tests'!
 
 !HLCodeWidgetTest methodsFor: 'tests'!

src/Helios-Workspace.st

@@ -1,7 +1,7 @@
 Smalltalk createPackage: 'Helios-Workspace'!
 (Smalltalk packageAt: 'Helios-Workspace' ifAbsent: [ self error: 'Package not created: Helios-Workspace' ]) imports: {'codeMirrorLib' -> 'codemirror/lib/codemirror'. 'codemirror/addon/hint/show-hint'. 'codemirror/mode/smalltalk/smalltalk'}!
 Object subclass: #HLCodeModel
-	instanceVariableNames: 'announcer environment receiver'
+	slots: {#announcer. #environment. #receiver}
 	package: 'Helios-Workspace'!
 
 !HLCodeModel methodsFor: 'accessing'!
@@ -67,7 +67,7 @@ on: anEnvironment
 ! !
 
 HLWidget subclass: #HLCodeWidget
-	instanceVariableNames: 'model wrapper code editor state'
+	slots: {#model. #wrapper. #code. #editor. #state}
 	package: 'Helios-Workspace'!
 
 !HLCodeWidget methodsFor: 'accessing'!
@@ -488,7 +488,7 @@ setupKeyMaps
 ! !
 
 HLCodeWidget subclass: #HLNavigationCodeWidget
-	instanceVariableNames: 'methodContents'
+	slots: {#methodContents}
 	package: 'Helios-Workspace'!
 
 !HLNavigationCodeWidget methodsFor: 'accessing'!
@@ -540,7 +540,7 @@ canBeOpenAsTab
 ! !
 
 HLNavigationCodeWidget subclass: #HLBrowserCodeWidget
-	instanceVariableNames: 'browserModel'
+	slots: {#browserModel}
 	package: 'Helios-Workspace'!
 
 !HLBrowserCodeWidget methodsFor: 'accessing'!
@@ -795,7 +795,7 @@ canBeOpenAsTab
 ! !
 
 HLWidget subclass: #HLWorkspace
-	instanceVariableNames: 'codeWidget transcript'
+	slots: {#codeWidget. #transcript}
 	package: 'Helios-Workspace'!
 
 !HLWorkspace methodsFor: 'accessing'!