--- a/OSErrorHolder.st Tue Dec 11 18:43:56 2001 +0100
+++ b/OSErrorHolder.st Tue Dec 11 18:45:19 2001 +0100
@@ -65,6 +65,14 @@
"
! !
+!OSErrorHolder class methodsFor:'Signal constants'!
+
+invalidArgumentsSignal
+ "return the signal for invalid arguments (e.g. right class, wrong value)."
+
+ ^ OsInvalidArgumentsError
+! !
+
!OSErrorHolder class methodsFor:'accessing'!
errorSignal
@@ -73,12 +81,6 @@
"Created: 25.1.1997 / 18:07:55 / cg"
!
-invalidArgumentsSignal
- ^ OperatingSystem invalidArgumentsSignal
-
- "Created: 13.9.1997 / 10:48:21 / cg"
-!
-
peerFaultSignal
^ OperatingSystem errorSignal
@@ -194,6 +196,17 @@
errorCategory := typ.
! !
+!OSErrorHolder methodsFor:'error reporting'!
+
+reportError
+ "Report an error."
+ "Delegate to the receiver's error reporter."
+
+ (self class perform:errorCategory) raiseWith:self.
+self halt.
+"/ ^ self errorReporter reportOn:self
+! !
+
!OSErrorHolder methodsFor:'others'!
errorString