--- a/ClassInitializeChange.st	Wed Mar 26 18:46:13 2014 +0100
+++ b/ClassInitializeChange.st	Wed Mar 26 18:46:20 2014 +0100
@@ -62,13 +62,30 @@
     "Created: / 21-03-2014 / 17:38:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!ClassInitializeChange methodsFor:'comparing'!
+
+sameAs:changeB
+    "return true, if the given change represents the same change as the receiver."
+
+    ^ (changeB isKindOf: self class) 
+        and:[ self fullClassName  = changeB fullClassName ]
+
+    "Created: / 26-03-2014 / 17:41:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!ClassInitializeChange methodsFor:'testing'!
+
+isClassInitializeChange
+    ^ true
+! !
+
 !ClassInitializeChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInitializeChange.st,v 1.1 2014-03-21 18:32:07 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInitializeChange.st,v 1.2 2014-03-26 17:46:20 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInitializeChange.st,v 1.1 2014-03-21 18:32:07 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassInitializeChange.st,v 1.2 2014-03-26 17:46:20 vrany Exp $'
 ! !