Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
commentary
authorClaus Gittinger <cg@exept.de>
Tue, 23 Apr 1996 16:04:52 +0200
changeset 1264 8d916aa63bce
parent 1263 92c1db6b0776
child 1265 371158fd54bc
commentary
Block.st file | annotate | diff | comparison | revisions
CheapBlk.st file | annotate | diff | comparison | revisions
CheapBlock.st file | annotate | diff | comparison | revisions
CompCode.st file | annotate | diff | comparison | revisions
CompiledCode.st file | annotate | diff | comparison | revisions
Context.st file | annotate | diff | comparison | revisions
ExecFunc.st file | annotate | diff | comparison | revisions
ExecutableFunction.st file | annotate | diff | comparison | revisions
Float.st file | annotate | diff | comparison | revisions
Fraction.st file | annotate | diff | comparison | revisions
LargeInt.st file | annotate | diff | comparison | revisions
LargeInteger.st file | annotate | diff | comparison | revisions
Message.st file | annotate | diff | comparison | revisions
Method.st file | annotate | diff | comparison | revisions
Point.st file | annotate | diff | comparison | revisions
SFloat.st file | annotate | diff | comparison | revisions
ShortFloat.st file | annotate | diff | comparison | revisions
SmallInt.st file | annotate | diff | comparison | revisions
SmallInteger.st file | annotate | diff | comparison | revisions
String.st file | annotate | diff | comparison | revisions 
--- a/Block.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Block.st	Tue Apr 23 16:04:52 1996 +0200
@@ -131,11 +131,12 @@
 !Block class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Block
 
-    "Modified: 16.4.1996 / 11:25:30 / cg"
+    "Modified: 23.4.1996 / 15:55:58 / cg"
 ! !
 
 !Block methodsFor:'STV compatibility'!
@@ -1050,6 +1051,6 @@
 !Block class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.52 1996-04-22 14:38:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.53 1996-04-23 14:03:44 cg Exp $'
 ! !
 Block initialize!
--- a/CheapBlk.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/CheapBlk.st	Tue Apr 23 16:04:52 1996 +0200
@@ -61,11 +61,13 @@
 !CheapBlock class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CheapBlock
 
     "Created: 16.4.1996 / 11:25:23 / cg"
+    "Modified: 23.4.1996 / 15:56:46 / cg"
 ! !
 
 !CheapBlock methodsFor:'accessing'!
@@ -118,5 +120,5 @@
 !CheapBlock class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CheapBlk.st,v 1.12 1996-04-22 14:38:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CheapBlk.st,v 1.13 1996-04-23 14:04:13 cg Exp $'
 ! !
--- a/CheapBlock.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/CheapBlock.st	Tue Apr 23 16:04:52 1996 +0200
@@ -61,11 +61,13 @@
 !CheapBlock class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CheapBlock
 
     "Created: 16.4.1996 / 11:25:23 / cg"
+    "Modified: 23.4.1996 / 15:56:46 / cg"
 ! !
 
 !CheapBlock methodsFor:'accessing'!
@@ -118,5 +120,5 @@
 !CheapBlock class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CheapBlock.st,v 1.12 1996-04-22 14:38:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CheapBlock.st,v 1.13 1996-04-23 14:04:13 cg Exp $'
 ! !
--- a/CompCode.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/CompCode.st	Tue Apr 23 16:04:52 1996 +0200
@@ -119,11 +119,12 @@
 !CompiledCode class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CompiledCode
 
-    "Modified: 16.4.1996 / 11:25:40 / cg"
+    "Modified: 23.4.1996 / 15:57:03 / cg"
 ! !
 
 !CompiledCode methodsFor:'accessing'!
@@ -371,6 +372,6 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CompCode.st,v 1.27 1996-04-22 14:37:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/CompCode.st,v 1.28 1996-04-23 14:04:07 cg Exp $'
 ! !
 CompiledCode initialize!
--- a/CompiledCode.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/CompiledCode.st	Tue Apr 23 16:04:52 1996 +0200
@@ -119,11 +119,12 @@
 !CompiledCode class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CompiledCode
 
-    "Modified: 16.4.1996 / 11:25:40 / cg"
+    "Modified: 23.4.1996 / 15:57:03 / cg"
 ! !
 
 !CompiledCode methodsFor:'accessing'!
@@ -371,6 +372,6 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.27 1996-04-22 14:37:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.28 1996-04-23 14:04:07 cg Exp $'
 ! !
 CompiledCode initialize!
--- a/Context.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Context.st	Tue Apr 23 16:04:52 1996 +0200
@@ -171,9 +171,12 @@
 !Context class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class & subclasses are known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned."
 
     ^ true
+
+    "Modified: 23.4.1996 / 15:58:00 / cg"
 ! !
 
 !Context methodsFor:'accessing'!
@@ -1152,6 +1155,6 @@
 !Context class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.54 1996-04-02 22:00:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Context.st,v 1.55 1996-04-23 14:04:52 cg Exp $'
 ! !
 Context initialize!
--- a/ExecFunc.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/ExecFunc.st	Tue Apr 23 16:04:52 1996 +0200
@@ -91,11 +91,12 @@
 !ExecutableFunction class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CompiledCode
 
-    "Modified: 16.4.1996 / 11:25:49 / cg"
+    "Modified: 23.4.1996 / 15:57:24 / cg"
 ! !
 
 !ExecutableFunction methodsFor:'accessing'!
@@ -294,6 +295,6 @@
 !ExecutableFunction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExecFunc.st,v 1.24 1996-04-22 14:36:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ExecFunc.st,v 1.25 1996-04-23 14:04:00 cg Exp $'
 ! !
 ExecutableFunction initialize!
--- a/ExecutableFunction.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/ExecutableFunction.st	Tue Apr 23 16:04:52 1996 +0200
@@ -91,11 +91,12 @@
 !ExecutableFunction class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == CompiledCode
 
-    "Modified: 16.4.1996 / 11:25:49 / cg"
+    "Modified: 23.4.1996 / 15:57:24 / cg"
 ! !
 
 !ExecutableFunction methodsFor:'accessing'!
@@ -294,6 +295,6 @@
 !ExecutableFunction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExecutableFunction.st,v 1.24 1996-04-22 14:36:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExecutableFunction.st,v 1.25 1996-04-23 14:04:00 cg Exp $'
 ! !
 ExecutableFunction initialize!
--- a/Float.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Float.st	Tue Apr 23 16:04:52 1996 +0200
@@ -246,9 +246,12 @@
 !Float class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Float
+
+    "Modified: 23.4.1996 / 15:59:04 / cg"
 !
 
 lastErrorNumber
@@ -1078,5 +1081,5 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.37 1996-04-23 07:35:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.38 1996-04-23 14:02:16 cg Exp $'
 ! !
--- a/Fraction.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Fraction.st	Tue Apr 23 16:04:52 1996 +0200
@@ -103,9 +103,12 @@
 !Fraction class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Fraction
+
+    "Modified: 23.4.1996 / 15:59:10 / cg"
 ! !
 
 !Fraction methodsFor:'accessing'!
@@ -478,6 +481,6 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.28 1996-04-17 10:43:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.29 1996-04-23 14:02:26 cg Exp $'
 ! !
 Fraction initialize!
--- a/LargeInt.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/LargeInt.st	Tue Apr 23 16:04:52 1996 +0200
@@ -243,9 +243,12 @@
 !LargeInteger class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned."
 
     ^ true
+
+    "Modified: 23.4.1996 / 15:59:21 / cg"
 ! !
 
 !LargeInteger methodsFor:'arithmetic'!
@@ -1609,5 +1612,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/LargeInt.st,v 1.25 1996-04-18 09:53:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/LargeInt.st,v 1.26 1996-04-23 14:01:57 cg Exp $'
 ! !
--- a/LargeInteger.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/LargeInteger.st	Tue Apr 23 16:04:52 1996 +0200
@@ -243,9 +243,12 @@
 !LargeInteger class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned."
 
     ^ true
+
+    "Modified: 23.4.1996 / 15:59:21 / cg"
 ! !
 
 !LargeInteger methodsFor:'arithmetic'!
@@ -1609,5 +1612,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.25 1996-04-18 09:53:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.26 1996-04-23 14:01:57 cg Exp $'
 ! !
--- a/Message.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Message.st	Tue Apr 23 16:04:52 1996 +0200
@@ -97,9 +97,12 @@
 !Message class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Message
+
+    "Modified: 23.4.1996 / 15:59:30 / cg"
 ! !
 
 !Message methodsFor:'accessing'!
@@ -157,5 +160,5 @@
 !Message class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Message.st,v 1.16 1996-04-16 09:29:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Message.st,v 1.17 1996-04-23 14:03:56 cg Exp $'
 ! !
--- a/Method.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Method.st	Tue Apr 23 16:04:52 1996 +0200
@@ -224,9 +224,12 @@
 !Method class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Method
+
+    "Modified: 23.4.1996 / 15:59:50 / cg"
 !
 
 maxNumberOfArguments
@@ -2102,6 +2105,6 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.86 1996-04-23 07:34:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.87 1996-04-23 14:04:29 cg Exp $'
 ! !
 Method initialize!
--- a/Point.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/Point.st	Tue Apr 23 16:04:52 1996 +0200
@@ -136,9 +136,12 @@
 !Point class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == Point
+
+    "Modified: 23.4.1996 / 16:00:18 / cg"
 ! !
 
 !Point methodsFor:'accessing'!
@@ -855,6 +858,6 @@
 !Point class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.33 1996-04-22 11:02:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Point.st,v 1.34 1996-04-23 14:03:16 cg Exp $'
 ! !
 Point initialize!
--- a/SFloat.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/SFloat.st	Tue Apr 23 16:04:52 1996 +0200
@@ -112,11 +112,12 @@
 !ShortFloat class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == ShortFloat
 
-
+    "Modified: 23.4.1996 / 16:00:23 / cg"
 ! !
 
 !ShortFloat methodsFor:'arithmetic'!
@@ -543,5 +544,5 @@
 !ShortFloat class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.4 1996-04-23 07:35:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SFloat.st,v 1.5 1996-04-23 14:02:41 cg Exp $'
 ! !
--- a/ShortFloat.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/ShortFloat.st	Tue Apr 23 16:04:52 1996 +0200
@@ -112,11 +112,12 @@
 !ShortFloat class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == ShortFloat
 
-
+    "Modified: 23.4.1996 / 16:00:23 / cg"
 ! !
 
 !ShortFloat methodsFor:'arithmetic'!
@@ -543,5 +544,5 @@
 !ShortFloat class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.4 1996-04-23 07:35:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ShortFloat.st,v 1.5 1996-04-23 14:02:41 cg Exp $'
 ! !
--- a/SmallInt.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/SmallInt.st	Tue Apr 23 16:04:52 1996 +0200
@@ -135,9 +135,12 @@
 !
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned."
 
     ^ true
+
+    "Modified: 23.4.1996 / 16:00:33 / cg"
 ! !
 
 !SmallInteger methodsFor:'arithmetic'!
@@ -2011,5 +2014,5 @@
 !SmallInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SmallInt.st,v 1.49 1996-04-17 20:51:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/SmallInt.st,v 1.50 1996-04-23 14:01:36 cg Exp $'
 ! !
--- a/SmallInteger.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/SmallInteger.st	Tue Apr 23 16:04:52 1996 +0200
@@ -135,9 +135,12 @@
 !
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned."
 
     ^ true
+
+    "Modified: 23.4.1996 / 16:00:33 / cg"
 ! !
 
 !SmallInteger methodsFor:'arithmetic'!
@@ -2011,5 +2014,5 @@
 !SmallInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.49 1996-04-17 20:51:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.50 1996-04-23 14:01:36 cg Exp $'
 ! !
--- a/String.st	Tue Apr 23 13:57:59 1996 +0200
+++ b/String.st	Tue Apr 23 16:04:52 1996 +0200
@@ -263,9 +263,12 @@
 !String class methodsFor:'queries'!
 
 isBuiltInClass
-    "this class is known by the run-time-system"
+    "return true if this class is known by the run-time-system.
+     Here, true is returned for myself, false for subclasses."
 
     ^ self == String
+
+    "Modified: 23.4.1996 / 16:00:38 / cg"
 ! !
 
 !String methodsFor:'accessing'!
@@ -2204,5 +2207,5 @@
 !String class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.73 1996-04-22 14:04:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/String.st,v 1.74 1996-04-23 14:01:02 cg Exp $'
 ! !
hg/stx-libbasic