--- a/Object.st Wed May 08 00:30:13 1996 +0200
+++ b/Object.st Wed May 08 09:15:41 1996 +0200
@@ -1983,28 +1983,37 @@
elementBoundsError
"{ Pragma: +optSpace }"
- "report error that badElement is out of bounds
- (i.e. cannot be put into that collection)"
+ "report an error that badElement is out of bounds
+ (i.e. cannot be put into that collection).
+ The error is reported by raising the ElementOutOfBoundsSignal exception."
^ ElementOutOfBoundsSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:12:45 / cg"
!
elementNotCharacter
"{ Pragma: +optSpace }"
- "report error that object to be stored is no Character.
- (usually when storing into Strings)"
+ "report an error that object to be stored is no Character.
+ (usually when storing into Strings).
+ The error is reported by raising the ElementOutOfBoundsSignal exception."
^ ElementOutOfBoundsSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:12:49 / cg"
!
elementNotInteger
"{ Pragma: +optSpace }"
- "report error that object to be stored is not Integer.
- (in collections that store integers only)"
+ "report an error that object to be stored is not Integer.
+ (in collections that store integers only).
+ The error is reported by raising the ElementOutOfBoundsSignal exception."
^ ElementOutOfBoundsSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:12:51 / cg"
!
enterDebuggerWith:anException message:aString
@@ -2061,53 +2070,85 @@
error
"{ Pragma: +optSpace }"
- "report error that an error occured"
-
- ^ ErrorSignal raiseIn:thisContext sender
+ "report error that an error occured.
+ The error is reported by raising the ErrorSignal exception."
+
+ ^ ErrorSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:01 / cg"
!
error:aString
"{ Pragma: +optSpace }"
- "enter debugger with error-message aString"
+ "enter debugger with error-message aString.
+ The error is reported by raising the ErrorSignal exception."
^ ErrorSignal raiseRequestWith:#error:
- errorString:aString
- in:thisContext sender
+ errorString:aString
+ in:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:04 / cg"
+!
+
+error:aString in:aContext
+ "{ Pragma: +optSpace }"
+
+ "enter debugger with error-message aString.
+ The error is reported by raising the ErrorSignal exception."
+
+ ^ ErrorSignal raiseRequestWith:#error:
+ errorString:aString
+ in:aContext
+
+ "Created: 8.5.1996 / 09:07:59 / cg"
+ "Modified: 8.5.1996 / 09:13:06 / cg"
!
errorKeyNotFound:aKey
"{ Pragma: +optSpace }"
- "report error that a key was not found in a collection"
+ "report an error that a key was not found in a collection.
+ The error is reported by raising the KeyNotFoundSignal exception."
^ KeyNotFoundSignal raiseRequestWith:aKey in:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:08 / cg"
!
errorNotFound
"{ Pragma: +optSpace }"
- "report error that no element was found in a collection"
+ "report an error that no element was found in a collection.
+ The error is reported by raising the NotFoundSignal exception."
^ NotFoundSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:11 / cg"
!
halt
"{ Pragma: +optSpace }"
- "enter debugger with halt-message"
+ "enter debugger with halt-message.
+ The error is reported by raising the HaltSignal exception."
^ HaltSignal raiseIn:thisContext sender.
+
+ "Modified: 8.5.1996 / 09:12:38 / cg"
!
halt:aString
"{ Pragma: +optSpace }"
- "enter debugger with halt-message"
+ "enter debugger with halt-message.
+ The error is reported by raising the HaltSignal exception."
^ HaltSignal raiseRequestWith:#halt:
- errorString:aString
- in:thisContext sender
+ errorString:aString
+ in:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:23 / cg"
!
implementedBySubclass
@@ -2121,10 +2162,13 @@
indexNotInteger
"{ Pragma: +optSpace }"
- "report error that index is not an Integer.
- (when accessing collections indexed by an integer key)"
+ "report an error that index is not an Integer.
+ (when accessing collections indexed by an integer key).
+ The error is reported by raising the NonIntegerIndexSignal exception."
^ NonIntegerIndexSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:13:37 / cg"
!
integerCheckError
@@ -2164,57 +2208,70 @@
notIndexed
"{ Pragma: +optSpace }"
- "report error that receiver has no indexed instance variables"
+ "report an error that receiver has no indexed instance variables"
^ self error:'receiver has no indexed variables'
+
+ "Modified: 8.5.1996 / 09:09:56 / cg"
!
primitiveFailed
"{ Pragma: +optSpace }"
- "report error that primitive code failed"
+ "report an error that some primitive code failed.
+ The error is reported by raising the PrimitiveFailureSignal exception."
^ PrimitiveFailureSignal raiseIn:(thisContext sender)
+
+ "Modified: 8.5.1996 / 09:14:07 / cg"
!
shouldNotImplement
"{ Pragma: +optSpace }"
- "report error that this message should not be implemented"
+ "report an error that this message should not be implemented"
^ self error:'method not appropriate for this class'
+
+ "Modified: 8.5.1996 / 09:09:44 / cg"
!
subclassResponsibility
"{ Pragma: +optSpace }"
- "report error that this message should have been reimplemented in a
+ "report an error that this message should have been reimplemented in a
subclass"
- ^ self error:'method must be reimplemented in subclass'
+ ^ self error:'method must be reimplemented in subclass' in:thisContext sender
+
+ "Modified: 8.5.1996 / 09:09:26 / cg"
!
subscriptBoundsError
"{ Pragma: +optSpace }"
- "report error that some index is out of bounds.
- (when accessing indexable collections)"
+ "report an error that some index is out of bounds.
+ (when accessing indexable collections).
+ The error is reported by raising the SubscriptOutOfBoundsSignal exception."
^ SubscriptOutOfBoundsSignal raiseIn:thisContext sender
+
+ "Modified: 8.5.1996 / 09:14:26 / cg"
!
subscriptBoundsError:anIndex
"{ Pragma: +optSpace }"
- "report error that anIndex is out of bounds.
- (when accessing indexable collections)"
+ "report an error that anIndex is out of bounds.
+ (when accessing indexable collections).
+ The error is reported by raising the SubscriptOutOfBoundsSignal exception."
^ SubscriptOutOfBoundsSignal
raiseRequestWith:anIndex
errorString:('subscript (' , anIndex printString , ') out of bounds')
in:thisContext sender
- "Modified: 26.2.1996 / 14:38:26 / cg"
+ "Modified: 8.5.1996 / 09:14:34 / cg"
!
typeCheckError
@@ -4984,6 +5041,6 @@
!Object class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.115 1996-05-03 09:58:11 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.116 1996-05-08 07:15:41 cg Exp $'
! !
Object initialize!