ClassClassVariableChange.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 12 Jun 2013 11:54:30 +0100
branchjv
changeset 3303 7ed5d48e3756
parent 3128 87750af738dc
child 3838 474d8ec95b33
permissions -rw-r--r--
Refactoring of class names and namespaces in ClassChange (part 1). The meaning of instvars in ClassChange was changed (well, actually it was defined), so: - className is the name of the class without any namespace prefix but including all owning classes. - nameSpaceName is the name of the original namespace of the class - nameSpaceOverride is client-enforced namespace namew - ownerClassName is the name of the owning class but without any namespace prefix. This commit actually fixes remaining RegressionTests::ChangeSetTests. CAUTION: currently, class names and namespace names are wrong when reading system changefile. This is due to a conceptual problem because there's no way how distinguish between namespace and owning class solely on the information in the changeset file. Next part of the refactoring should fix this, but at the cost of changing the changefile format. The impact to old tools not using ChangeSet but rather their own implementation must be investigated (tools like ChangesBrowser).
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1985
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     1
"
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     2
 COPYRIGHT (c) 2003 by eXept Software AG
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     3
              All Rights Reserved
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     4
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     5
 This software is furnished under a license and may be used
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     6
 only in accordance with the terms of that license and with the
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     8
 be provided or otherwise made available to, or used by, any
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
     9
 other person.  No title to or ownership of the software is
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    10
 hereby transferred.
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    11
"
1317
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libbasic3' }"
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
ClassChange subclass:#ClassClassVariableChange
3303
7ed5d48e3756 Refactoring of class names and namespaces in ClassChange (part 1).
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3128
diff changeset
    15
	instanceVariableNames:'variableName otherParameters'
1317
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
	classVariableNames:''
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	poolDictionaries:''
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	category:'System-Changes'
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
!
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
1985
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    21
!ClassClassVariableChange class methodsFor:'documentation'!
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    22
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    23
copyright
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    24
"
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    25
 COPYRIGHT (c) 2003 by eXept Software AG
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    26
              All Rights Reserved
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    27
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    28
 This software is furnished under a license and may be used
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    29
 only in accordance with the terms of that license and with the
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    30
 inclusion of the above copyright notice.   This software may not
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    31
 be provided or otherwise made available to, or used by, any
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    32
 other person.  No title to or ownership of the software is
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    33
 hereby transferred.
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    34
"
2165
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    35
!
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    36
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    37
documentation
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    38
"
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    39
    A changed classVariable
27441b4a3431 comment/format in:6 methods
Claus Gittinger <cg@exept.de>
parents: 1985
diff changeset
    40
"
1985
da96a146b89e copyright
Claus Gittinger <cg@exept.de>
parents: 1317
diff changeset
    41
! !
1317
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
!ClassClassVariableChange methodsFor:'accessing'!
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
name:varNameArg nameSpaceName:nsNameArg type:varTypeArg otherParameters:otherParametersArg
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
    variableName := varNameArg.
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
    className := nsNameArg.
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
    otherParameters := otherParametersArg.
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
!
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
source
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
    "synthesize the changes source"
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
    ^ String
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
        streamContents:
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    56
            [:s |
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
                self printOn:s.
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
            ]
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
! !
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
!ClassClassVariableChange methodsFor:'printing & storing'!
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
printOn:aStream
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
    aStream nextPutAll:self className; nextPutAll:' addClassVarName: ' , variableName storeString
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    65
! !
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    66
2615
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    67
!ClassClassVariableChange methodsFor:'visiting'!
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    68
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    69
acceptChangeVisitor:aVisitor
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    70
    ^ aVisitor visitClassVariableChange:self.
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    71
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    72
    "Created: / 25-11-2011 / 17:12:53 / cg"
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    73
! !
1770fc57edd8 visitor support (for monticello);
Claus Gittinger <cg@exept.de>
parents: 2165
diff changeset
    74
1317
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    75
!ClassClassVariableChange class methodsFor:'documentation'!
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    76
ce08ad1930e4 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    77
version
3121
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    78
    ^ '$Header: ClassClassVariableChange.st 1909 2012-03-31 00:14:49Z vranyj1 $'
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    79
!
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    80
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    81
version_HG
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    82
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    83
    ^ '$Changeset: <not expanded> $'
3012
4f40b8304d54 Added InvalidChange
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3011
diff changeset
    84
!
4f40b8304d54 Added InvalidChange
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3011
diff changeset
    85
4f40b8304d54 Added InvalidChange
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3011
diff changeset
    86
version_SVN
3121
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    87
    ^ '§Id: ClassClassVariableChange.st 1909 2012-03-31 00:14:49Z vranyj1 §'
3012
4f40b8304d54 Added InvalidChange
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3011
diff changeset
    88
! !
3121
19723298dd2c Bugfix: reading of Java class extensions methods.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 3042
diff changeset
    89