# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 932744713 -7200
# Node ID 0709daf5555886ba5152956ba07173a21fcfce86
# Parent  6928884b4c8ab919722295166abd14749775dbbb
initial checkin

diff -r 6928884b4c8a -r 0709daf55558 Error.st
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Error.st	Fri Jul 23 17:45:13 1999 +0200
@@ -0,0 +1,38 @@
+Exception subclass:#Error
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Kernel-Exceptions'
+!
+
+!Error class methodsFor:'documentation'!
+
+documentation
+"
+    Error ist an abstract superclass of all error exceptions in the system
+
+    [author:]
+        Stefan Vogel
+
+    [see also:]
+        Signal
+"
+! !
+
+!Error class methodsFor:'queries'!
+
+mayProceed
+    "By default, errors do not allow to proceed.
+     Subclasses may change this"
+
+    ^ false
+
+    "Created: / 23.7.1999 / 14:52:26 / stefan"
+    "Modified: / 23.7.1999 / 14:52:39 / stefan"
+! !
+
+!Error class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libbasic/Error.st,v 1.1 1999-07-23 15:45:13 stefan Exp $'
+! !