ControlInterrupt.st
author Claus Gittinger <cg@exept.de>
Tue, 26 Feb 2002 14:02:26 +0100
changeset 6421 58dca33cf0fc
parent 6207 b53b64413b40
child 7232 1d05a293b8b0
permissions -rw-r--r--
#valueNowOrOnUnwindDo: -> #ensure:
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5970
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"{ Package: 'stx:libbasic' }"
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     3
GenericException subclass:#ControlInterrupt
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     4
	instanceVariableNames:''
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
	classVariableNames:''
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
	poolDictionaries:''
6207
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
     7
	category:'Kernel-Exceptions-Control'
5970
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
!
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
6207
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    10
!ControlInterrupt class methodsFor:'documentation'!
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    11
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    12
documentation
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    13
"
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    14
    parent of all control-related interrupts (halt, breakpoint etc.)
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    15
"
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    16
! !
5970
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
6200
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    18
!ControlInterrupt class methodsFor:'testing'!
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    19
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    20
isControlInterrupt
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    21
    ^ true
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    22
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    23
    "Created: / 16.11.2001 / 16:11:11 / cg"
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    24
! !
65f0631e5221 added #isControlInterrupt
Claus Gittinger <cg@exept.de>
parents: 5970
diff changeset
    25
5970
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    26
!ControlInterrupt class methodsFor:'documentation'!
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    27
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    28
version
6207
b53b64413b40 caetgory change and documentation added
Claus Gittinger <cg@exept.de>
parents: 6200
diff changeset
    29
    ^ '$Header: /cvs/stx/stx/libbasic/ControlInterrupt.st,v 1.3 2001-11-17 10:02:02 cg Exp $'
5970
9e695ff6b5b2 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    30
! !