33 #superclass : ' Object' ,
44 #instVars : [
55 ' entity' ,
6- ' changeType' ,
76 ' expectedValue' ,
87 ' actualValue'
98 ],
@@ -13,84 +12,47 @@ Class {
1312
1413{ #category : ' instance creation' }
1514FamixSimpleDifference class >> createEntityAdded: anEntity actualValue: actualValue [
16- ^ self
17- entity: anEntity
18- changeType: self entityAdded
19- expectedValue: nil
20- actualValue: actualValue
15+ ^ FamixSimpleDifferenceEntityAddition new
16+ entity: anEntity;
17+ expectedValue: FamixSimpleDifferenceNullValue new ;
18+ actualValue: actualValue;
19+ yourself
2120]
2221
2322{ #category : ' instance creation' }
2423FamixSimpleDifference class >> createEntityChanged: anEntity expectedValue: expectedValue actualValue: actualValue [
25- ^ self
26- entity: anEntity
27- changeType: self entityChanged
28- expectedValue: expectedValue
29- actualValue: actualValue
24+ ^ FamixSimpleDifferenceEntityChanged new
25+ entity: anEntity;
26+ expectedValue: expectedValue;
27+ actualValue: actualValue;
28+ yourself
3029]
3130
3231{ #category : ' instance creation' }
33- FamixSimpleDifference class >> createEntityRemoved : anEntity expectedValue: expectedValue [
34- ^ self
35- entity: anEntity
36- changeType: self entityRemoved
37- expectedValue: expectedValue
38- actualValue: nil
32+ FamixSimpleDifference class >> createEntityDeletion : anEntity expectedValue: expectedValue [
33+ ^ FamixSimpleDifferenceEntityDeletion new
34+ entity: anEntity;
35+ expectedValue: expectedValue;
36+ actualValue: FamixSimpleDifferenceNullValue new ;
37+ yourself
3938]
4039
4140{ #category : ' instance creation' }
4241FamixSimpleDifference class >> createPropertyChanged: anEntity expectedValue: expectedValue actualValue: actualValue [
43- ^ self
44- entity: anEntity
45- changeType: self propertyChanged
46- expectedValue: expectedValue
47- actualValue: actualValue
42+ ^ FamixSimpleDifferencePropertyChanged new
43+ entity: anEntity;
44+ expectedValue: expectedValue;
45+ actualValue: actualValue;
46+ yourself
4847]
4948
5049{ #category : ' instance creation' }
5150FamixSimpleDifference class >> createRelationChanged: anEntity expectedValue: expectedValue actualValue: actualValue [
52- ^ self
53- entity: anEntity
54- changeType: self relationChanged
55- expectedValue: expectedValue
56- actualValue: actualValue
57- ]
58-
59- { #category : ' instance creation' }
60- FamixSimpleDifference class >> entity: anEntity changeType: aSymbol expectedValue: val1 actualValue: val2 [
61-
62- | difference |
63- difference := FamixSimpleDifference new .
64- difference entity: anEntity.
65- difference changeType: aSymbol.
66- difference expectedValue: val1.
67- difference actualValue: val2.
68- ^ difference
69- ]
70-
71- { #category : ' constants' }
72- FamixSimpleDifference class >> entityAdded [
73- ^ #entityAdded
74- ]
75-
76- { #category : ' constants' }
77- FamixSimpleDifference class >> entityChanged [
78- ^ #entityChanged
79- ]
80-
81- { #category : ' constants' }
82- FamixSimpleDifference class >> entityRemoved [
83- ^ #entityRemoved
84- ]
85-
86- { #category : ' constants' }
87- FamixSimpleDifference class >> propertyChanged [
88- ^ #propertyChanged
89- ]
90-
91- { #category : ' constants' }
92- FamixSimpleDifference class >> relationChanged [
93- ^ #relationChanged
51+ ^ FamixSimpleDifferenceRelationChanged new
52+ entity: anEntity;
53+ expectedValue: expectedValue;
54+ actualValue: actualValue;
55+ yourself
9456]
9557
9658{ #category : ' accessing' }
@@ -106,15 +68,9 @@ FamixSimpleDifference >> actualValue: anObject [
10668]
10769
10870{ #category : ' accessing' }
109- FamixSimpleDifference >> changeType [
110-
111- ^ changeType
112- ]
113-
114- { #category : ' accessing' }
115- FamixSimpleDifference >> changeType: anObject [
116-
117- changeType := anObject
71+ FamixSimpleDifference >> changeTypeName [
72+ " the name have to be defined by the subclass"
73+ ^ self subclassResponsibility
11874]
11975
12076{ #category : ' accessing' }
@@ -147,7 +103,7 @@ FamixSimpleDifference >> printOn: aStream [
147103
148104 super printOn: aStream.
149105 aStream nextPutAll: ' (' .
150- aStream print: changeType .
106+ aStream print: self changeTypeName .
151107
152108 aStream
153109 nextPutAll: ' -> Expected: ' ;
0 commit comments