author | Claus Gittinger <cg@exept.de> |
Thu, 27 Jun 2019 15:21:18 +0200 | |
changeset 24377 | 2fbcb2fa6c43 |
parent 20450 | bb3b6784f073 |
child 20578 | 39641ba8d6e0 |
permissions | -rw-r--r-- |
20450 | 1 |
"{ Encoding: utf8 }" |
2 |
||
7587 | 3 |
" |
4 |
COPYRIGHT (c) 2003 by eXept Software AG |
|
5 |
All Rights Reserved |
|
6 |
||
7 |
This software is furnished under a license and may be used |
|
8 |
only in accordance with the terms of that license and with the |
|
9 |
inclusion of the above copyright notice. This software may not |
|
10 |
be provided or otherwise made available to, or used by, any |
|
11 |
other person. No title to or ownership of the software is |
|
12 |
hereby transferred. |
|
13 |
" |
|
20450 | 14 |
"{ Package: 'stx:libbasic' }" |
7587 | 15 |
|
20450 | 16 |
"{ NameSpace: Smalltalk }" |
7145 | 17 |
|
18 |
ProceedableError subclass:#ExecutionError |
|
19 |
instanceVariableNames:'' |
|
20 |
classVariableNames:'' |
|
21 |
poolDictionaries:'' |
|
22 |
category:'Kernel-Exceptions-ExecutionErrors' |
|
23 |
! |
|
24 |
||
7231 | 25 |
!ExecutionError class methodsFor:'documentation'! |
26 |
||
7587 | 27 |
copyright |
28 |
" |
|
29 |
COPYRIGHT (c) 2003 by eXept Software AG |
|
30 |
All Rights Reserved |
|
31 |
||
32 |
This software is furnished under a license and may be used |
|
33 |
only in accordance with the terms of that license and with the |
|
34 |
inclusion of the above copyright notice. This software may not |
|
35 |
be provided or otherwise made available to, or used by, any |
|
36 |
other person. No title to or ownership of the software is |
|
37 |
hereby transferred. |
|
38 |
" |
|
39 |
! |
|
40 |
||
7231 | 41 |
documentation |
42 |
" |
|
43 |
Common parent of execution-related errors |
|
44 |
" |
|
45 |
! ! |
|
7145 | 46 |
|
7602
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
47 |
!ExecutionError class methodsFor:'initialization'! |
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
48 |
|
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
49 |
initialize |
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
50 |
NotifierString := 'execution error'. |
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
51 |
! ! |
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
52 |
|
20450 | 53 |
!ExecutionError class methodsFor:'testing'! |
54 |
||
55 |
isProgramError |
|
56 |
"redefined in all exceptions which are programmer's errors, |
|
57 |
and which should probably not be ignored. |
|
58 |
I.e. a global error handler should reject and let a debugger get control." |
|
59 |
||
60 |
^ true |
|
61 |
! ! |
|
62 |
||
7145 | 63 |
!ExecutionError class methodsFor:'documentation'! |
64 |
||
65 |
version |
|
20450 | 66 |
^ '$Header$' |
7145 | 67 |
! ! |
7602
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
68 |
|
20450 | 69 |
|
7602
d048f13cd50a
Exception classes initialize themself.
Stefan Vogel <sv@exept.de>
parents:
7587
diff
changeset
|
70 |
ExecutionError initialize! |