--- a/OSErrorHolder.st	Sat Apr 02 11:05:12 2016 +0100
+++ b/OSErrorHolder.st	Sun Apr 03 07:04:52 2016 +0200
@@ -66,13 +66,6 @@
 
 !OSErrorHolder class methodsFor:'Signal constants'!
 
-signals
-    Signals isNil ifTrue:[
-	self initializeSignals
-    ].
-    ^ Signals
-!
-
 allocRetrySignal
     ^ self signals at:#allocRetrySignal
 !
@@ -181,6 +174,13 @@
     ^ self signals at:signalName
 !
 
+signals
+    Signals isNil ifTrue:[
+	self initializeSignals
+    ].
+    ^ Signals
+!
+
 transferFaultSignal
     ^ self signals at:#transferFaultSignal
 !
@@ -406,6 +406,21 @@
 	in:(thisContext "sender").
 
 "/    ^ self errorReporter reportOn:self
+!
+
+reportProceedableError
+    "Report an error."
+    "Delegate to the receiver's error reporter."
+
+    |signal|
+
+    signal := self class signalNamed:errorCategory.
+    signal
+        raiseRequestWith:self
+        errorString:(parameter isNil ifTrue:[nil] ifFalse:[' - ', parameter printString])
+        in:(thisContext "sender").
+
+"/    ^ self errorReporter reportOn:self
 ! !
 
 !OSErrorHolder methodsFor:'others'!
@@ -437,11 +452,11 @@
 !OSErrorHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.24 2015-05-16 09:59:00 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/OSErrorHolder.st,v 1.24 2015-05-16 09:59:00 cg Exp $'
+    ^ '$Header$'
 ! !