MethodDefinitionChange.st
author Claus Gittinger <cg@exept.de>
Wed, 09 Apr 2003 12:50:33 +0200
changeset 1225 6e912daf6b1b
parent 912 beff816c6f5d
child 1321 ca932dd9f564
permissions -rw-r--r--
+isMethodDefinitionChange
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1225
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
     1
"{ Package: 'stx:libbasic3' }"
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
     2
912
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
MethodChange subclass:#MethodDefinitionChange
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
	instanceVariableNames:'attributes'
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
	classVariableNames:''
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
	poolDictionaries:''
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
	category:'System-Changes'
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
!
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
!MethodDefinitionChange methodsFor:'accessing'!
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
attributes
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
    "return the value of the instance variable 'attributes' (automatically generated)"
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
1225
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    16
    ^ attributes
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    17
!
912
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
attributes:something
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
    "set the value of the instance variable 'attributes' (automatically generated)"
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
1225
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    22
    attributes := something.
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    23
! !
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    24
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    25
!MethodDefinitionChange methodsFor:'queries'!
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    26
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    27
isMethodDefinitionChange
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    28
    ^ true
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    29
! !
912
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    31
!MethodDefinitionChange class methodsFor:'documentation'!
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    32
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    33
version
1225
6e912daf6b1b +isMethodDefinitionChange
Claus Gittinger <cg@exept.de>
parents: 912
diff changeset
    34
    ^ '$Header: /cvs/stx/stx/libbasic3/MethodDefinitionChange.st,v 1.2 2003-04-09 10:50:33 cg Exp $'
912
beff816c6f5d initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    35
! !