initial checkin
authorClaus Gittinger <cg@exept.de>
Tue, 06 Jul 1999 11:54:19 +0200
changeset 782 fc228e99f1cf
parent 781 d32abf3c57d7
child 783 90ffa6f0a86b
initial checkin
ClassPrimitiveChange.st
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClassPrimitiveChange.st	Tue Jul 06 11:54:19 1999 +0200
@@ -0,0 +1,29 @@
+ClassChange subclass:#ClassPrimitiveChange
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Changes'
+!
+
+
+!ClassPrimitiveChange methodsFor:'accessing'!
+
+class:aClass source:newSource
+    className := aClass.
+    source := newSource
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveChange methodsFor:'queries'!
+
+isPrimitiveChange
+    ^ true
+! !
+
+!ClassPrimitiveChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveChange.st,v 1.1 1999-07-06 09:54:19 cg Exp $'
+! !