more changeSet stuff
authorClaus Gittinger <cg@exept.de>
Sun, 03 Dec 1995 18:25:09 +0100
changeset 101 9a1c22e807e0
parent 100 d09e51d14901
child 102 3f85fe87cc58
more changeSet stuff
ChangeSet.st
ClassChange.st
ClassChg.st
ClassDefinitionChange.st
ClassPrimitiveDefinitionsChange.st
ClassPrimitiveFunctionsChange.st
ClassPrimitiveVariablesChange.st
ClsDefChg.st
ClsPDChg.st
ClsPFChg.st
ClsPVChg.st
Make.proto
--- a/ChangeSet.st	Sun Dec 03 15:37:30 1995 +0100
+++ b/ChangeSet.st	Sun Dec 03 18:25:09 1995 +0100
@@ -72,10 +72,30 @@
     newChange := ClassDefinitionChange class:aClass.
     self add:newChange
 
-    "Created: 3.12.1995 / 13:45:53 / cg"
     "Modified: 3.12.1995 / 14:05:57 / cg"
 !
 
+addPrimitiveDefinitionsChangeFor:aClass
+    |newChange|
+
+    newChange := ClassPrimitiveDefinitionsChange class:aClass.
+    self add:newChange
+!
+
+addPrimitiveFunctionsChangeFor:aClass
+    |newChange|
+
+    newChange := ClassPrimitiveFunctionsChange class:aClass.
+    self add:newChange
+!
+
+addPrimitiveVariablesChangeFor:aClass
+    |newChange|
+
+    newChange := ClassPrimitiveVariablesChange class:aClass.
+    self add:newChange
+!
+
 addMethodCategoryChange:aMethod category:newCategory in:aClass
     |newChange|
 
@@ -117,5 +137,5 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.14 1995-12-03 14:37:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.15 1995-12-03 17:25:04 cg Exp $'
 ! !
--- a/ClassChange.st	Sun Dec 03 15:37:30 1995 +0100
+++ b/ClassChange.st	Sun Dec 03 18:25:09 1995 +0100
@@ -59,8 +59,14 @@
     ^  className
 ! !
 
+!ClassChange methodsFor:'printing'!
+
+printOn:aStream
+    aStream nextPutAll:source asCollectionOfLines first.
+! !
+
 !ClassChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.11 1995-12-03 14:37:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassChange.st,v 1.12 1995-12-03 17:25:06 cg Exp $'
 ! !
--- a/ClassChg.st	Sun Dec 03 15:37:30 1995 +0100
+++ b/ClassChg.st	Sun Dec 03 18:25:09 1995 +0100
@@ -59,8 +59,14 @@
     ^  className
 ! !
 
+!ClassChange methodsFor:'printing'!
+
+printOn:aStream
+    aStream nextPutAll:source asCollectionOfLines first.
+! !
+
 !ClassChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClassChg.st,v 1.11 1995-12-03 14:37:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClassChg.st,v 1.12 1995-12-03 17:25:06 cg Exp $'
 ! !
--- a/ClassDefinitionChange.st	Sun Dec 03 15:37:30 1995 +0100
+++ b/ClassDefinitionChange.st	Sun Dec 03 18:25:09 1995 +0100
@@ -50,17 +50,8 @@
     "Modified: 3.12.1995 / 14:06:33 / cg"
 ! !
 
-!ClassDefinitionChange methodsFor:'printing'!
-
-printOn:aStream
-    aStream nextPutAll:source asCollectionOfLines first.
-
-    "Created: 3.12.1995 / 14:07:09 / cg"
-    "Modified: 3.12.1995 / 14:08:26 / cg"
-! !
-
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.12 1995-12-03 14:36:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassDefinitionChange.st,v 1.13 1995-12-03 17:25:06 cg Exp $'
 ! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClassPrimitiveDefinitionsChange.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveDefinitionsChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveDefinitionsChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive definition-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveDefinitionsChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveDefinitionsString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveDefinitionsChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveDefinitionsChange.st,v 1.1 1995-12-03 17:25:07 cg Exp $'
+! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClassPrimitiveFunctionsChange.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveFunctionsChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveFunctionsChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive function-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveFunctionsChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveFunctionsString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveFunctionsChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveFunctionsChange.st,v 1.1 1995-12-03 17:25:08 cg Exp $'
+! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClassPrimitiveVariablesChange.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveVariablesChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveVariablesChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive variables-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveVariablesChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveVariablesString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveVariablesChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveVariablesChange.st,v 1.1 1995-12-03 17:25:08 cg Exp $'
+! !
--- a/ClsDefChg.st	Sun Dec 03 15:37:30 1995 +0100
+++ b/ClsDefChg.st	Sun Dec 03 18:25:09 1995 +0100
@@ -50,17 +50,8 @@
     "Modified: 3.12.1995 / 14:06:33 / cg"
 ! !
 
-!ClassDefinitionChange methodsFor:'printing'!
-
-printOn:aStream
-    aStream nextPutAll:source asCollectionOfLines first.
-
-    "Created: 3.12.1995 / 14:07:09 / cg"
-    "Modified: 3.12.1995 / 14:08:26 / cg"
-! !
-
 !ClassDefinitionChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClsDefChg.st,v 1.12 1995-12-03 14:36:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClsDefChg.st,v 1.13 1995-12-03 17:25:06 cg Exp $'
 ! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClsPDChg.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveDefinitionsChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveDefinitionsChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive definition-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveDefinitionsChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveDefinitionsString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveDefinitionsChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClsPDChg.st,v 1.1 1995-12-03 17:25:07 cg Exp $'
+! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClsPFChg.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveFunctionsChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveFunctionsChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive function-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveFunctionsChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveFunctionsString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveFunctionsChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClsPFChg.st,v 1.1 1995-12-03 17:25:08 cg Exp $'
+! !
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/ClsPVChg.st	Sun Dec 03 18:25:09 1995 +0100
@@ -0,0 +1,57 @@
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+
+ClassChange subclass:#ClassPrimitiveVariablesChange
+	 instanceVariableNames:''
+	 classVariableNames:''
+	 poolDictionaries:''
+	 category:'System-Changes'
+!
+
+!ClassPrimitiveVariablesChange class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 1995 by Claus Gittinger
+	      All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice.   This software may not
+ be provided or otherwise made available to, or used by, any
+ other person.  No title to or ownership of the software is
+ hereby transferred.
+"
+!
+
+documentation
+"
+    instances represent a classes primitive variables-changes. 
+    They are typically held in a ChangeSet.
+"
+! !
+
+!ClassPrimitiveVariablesChange methodsFor:'accessing'!
+
+class:aClass 
+    className := aClass name.
+    source := aClass primitiveVariablesString
+
+    "Created: 3.12.1995 / 14:02:40 / cg"
+    "Modified: 3.12.1995 / 14:06:33 / cg"
+! !
+
+!ClassPrimitiveVariablesChange class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic3/Attic/ClsPVChg.st,v 1.1 1995-12-03 17:25:08 cg Exp $'
+! !
--- a/Make.proto	Sun Dec 03 15:37:30 1995 +0100
+++ b/Make.proto	Sun Dec 03 18:25:09 1995 +0100
@@ -1,5 +1,5 @@
 #
-# $Header: /cvs/stx/stx/libbasic3/Make.proto,v 1.12 1995-11-05 15:57:53 cg Exp $
+# $Header: /cvs/stx/stx/libbasic3/Make.proto,v 1.13 1995-12-03 17:25:09 cg Exp $
 #
 # -------------- no need to change anything below ----------
 
@@ -25,6 +25,9 @@
 	  ClassChg.$(O)                             \
 	    ClsComChg.$(O)                          \
 	    ClsDefChg.$(O)                          \
+	    ClsPDChg.$(O)                           \
+	    ClsPFChg.$(O)                           \
+	    ClsPVChg.$(O)                           \
 	  MethodChg.$(O)                            \
 	    MthdCatChg.$(O)                         \
 	    MthdPrivChg.$(O)                        \
@@ -37,6 +40,9 @@
 	  ClassChg.$(O)                             \
 	    ClsComChg.$(O)                          \
 	    ClsDefChg.$(O)                          \
+	    ClsPDChg.$(O)                           \
+	    ClsPFChg.$(O)                           \
+	    ClsPVChg.$(O)                           \
 	  MethodChg.$(O)                            \
 	    MthdCatChg.$(O)                         \
 	    MthdPrivChg.$(O)                        \
@@ -89,6 +95,9 @@
 ClassOrg.$(O): ClassOrg.st $(STCHDR) ../include/Object.H
 ClsComChg.$(O): ClsComChg.st $(STCHDR) ../include/Object.H
 ClsDefChg.$(O): ClsDefChg.st $(STCHDR) ../include/Object.H
+ClsPDChg.$(O): ClsPDChg.st $(STCHDR) ../include/Object.H
+ClsPFChg.$(O): ClsPFChg.st $(STCHDR) ../include/Object.H
+ClsPVChg.$(O): ClsPVChg.st $(STCHDR) ../include/Object.H
 HistLine.$(O): HistLine.st $(STCHDR) ../include/Object.H
 HistMgr.$(O): HistMgr.st $(STCHDR) ../include/Object.H
 MethodChg.$(O): MethodChg.st $(STCHDR) ../include/Object.H