Skip to content
Permalink
Browse files

fixes #2879

  • Loading branch information
MarcusDenker committed Mar 18, 2019
1 parent 9b498b9 commit d8dffb852e87e4613310507ad1da205941b2f6e1
Showing with 2 additions and 23 deletions.
  1. +0 −7 src/Kernel/Class.class.st
  2. +2 −3 src/Kernel/ClassDescription.class.st
  3. +0 −13 src/Kernel/Metaclass.class.st
@@ -940,13 +940,6 @@ Class >> removeFromSystemUnlogged [
^self removeFromSystem: false
]

{ #category : #'instance variables' }
Class >> removeInstVarNamed: aString [
"Remove the argument, aString, as one of the receiver's instance variables."

^self removeSlot: (self slotNamed: aString)
]

{ #category : #'pool variables' }
Class >> removeSharedPool: aDictionary [
"Remove the pool dictionary, aDictionary, as one of the receiver's pool
@@ -1023,10 +1023,9 @@ ClassDescription >> reformatAll [

{ #category : #'instance variables' }
ClassDescription >> removeInstVarNamed: aString [
"Remove the argument, aString, as one of the receiver's instance
variables. Create an error notification if the argument is not found."
"Remove the argument, aString, as one of the receiver's instance variables."

^self subclassResponsibility
^self removeSlot: (self slotNamed: aString)
]

{ #category : #'accessing tags' }
@@ -257,19 +257,6 @@ Metaclass >> postCopy [
thisClass := nil.
]

{ #category : #'instance variables' }
Metaclass >> removeInstVarNamed: aString [
"Remove the argument, aString, as one of the receiver's instance variables."

| newArray newString |
(self instVarNames includes: aString)
ifFalse: [self error: aString , ' is not one of my instance variables'].
newArray := self instVarNames copyWithout: aString.
newString := ''.
newArray do: [:aString2 | newString := aString2 , ' ' , newString].
self instanceVariableNames: newString
]

{ #category : #'instance variables' }
Metaclass >> removeSlot: aClassSlot [

0 comments on commit d8dffb8

Please sign in to comment.
You can’t perform that action at this time.