MCDefinition.st
branchjv
changeset 1099 df7f9c846b88
parent 1095 87f223484bc3
child 1107 ea7e660aa312
--- a/MCDefinition.st	Mon May 25 13:24:22 2020 +0100
+++ b/MCDefinition.st	Mon May 25 13:25:27 2020 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "{ Package: 'stx:goodies/monticello' }"
 
 "{ NameSpace: Smalltalk }"
@@ -32,6 +30,7 @@
     "Modified: / 18-08-2009 / 10:18:15 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
+
 !MCDefinition methodsFor:'accessing'!
 
 provisions
@@ -217,6 +216,14 @@
     "Created: / 08-11-2010 / 17:29:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!MCDefinition methodsFor:'visiting'!
+
+accept: aVisitor
+    ^ self subclassResponsibility
+
+    "Modified (comment): / 25-05-2020 / 12:38:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !MCDefinition class methodsFor:'documentation'!
 
 version
@@ -233,6 +240,6 @@
 !
 
 version_SVN
-    ^ '§Id: MCDefinition.st 24 2010-11-09 14:00:17Z vranyj1 §'
+    ^ '§Id: MCDefinition.st 24 2010-11-09 14:00:17Z vranyj1 §'
 ! !