equal
deleted
inserted
replaced
64 transform: anMCSnapshot |
64 transform: anMCSnapshot |
65 "Returns a transformed **copy** of the original snapshot" |
65 "Returns a transformed **copy** of the original snapshot" |
66 |
66 |
67 original := anMCSnapshot. |
67 original := anMCSnapshot. |
68 transformed := original copy. |
68 transformed := original copy. |
|
69 |
69 "use #copy to allow modifications to definitions collection while |
70 "use #copy to allow modifications to definitions collection while |
70 transforming. |
71 transforming." |
71 use reverseDo: to transform class definitions first" |
|
72 transformed definitions copy reverseDo:[:definition| |
72 transformed definitions copy reverseDo:[:definition| |
73 definition accept: self. |
73 definition accept: self. |
74 ]. |
74 ]. |
75 ^transformed. |
75 ^transformed. |
76 |
76 |
77 "Created: / 29-05-2013 / 11:40:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
77 "Created: / 29-05-2013 / 11:40:05 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
78 "Modified: / 31-05-2013 / 00:10:58 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
78 ! ! |
79 ! ! |
79 |
80 |
80 !MCStXSnapshotTransformation methodsFor:'visiting'! |
81 !MCStXSnapshotTransformation methodsFor:'visiting'! |
81 |
82 |
82 visitClassDefinition: definition |
83 visitClassDefinition: definition |
110 ! ! |
111 ! ! |
111 |
112 |
112 !MCStXSnapshotTransformation class methodsFor:'documentation'! |
113 !MCStXSnapshotTransformation class methodsFor:'documentation'! |
113 |
114 |
114 version |
115 version |
115 ^ '$Header: /cvs/stx/stx/goodies/monticello/MCStXSnapshotTransformation.st,v 1.1 2013-05-29 11:46:06 vrany Exp $' |
116 ^ '$Header: /cvs/stx/stx/goodies/monticello/MCStXSnapshotTransformation.st,v 1.2 2013-05-30 23:35:33 vrany Exp $' |
116 ! |
117 ! |
117 |
118 |
118 version_CVS |
119 version_CVS |
119 ^ '$Header: /cvs/stx/stx/goodies/monticello/MCStXSnapshotTransformation.st,v 1.1 2013-05-29 11:46:06 vrany Exp $' |
120 ^ '$Header: /cvs/stx/stx/goodies/monticello/MCStXSnapshotTransformation.st,v 1.2 2013-05-30 23:35:33 vrany Exp $' |
120 ! ! |
121 ! ! |
121 |
122 |