hg/stx-libbasic: ControlInterrupt.st@c1217211909c (annotated)

7588 1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	1	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	2	COPYRIGHT (c) 2001 by eXept Software AG
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	3	All Rights Reserved
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	4
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	5	This software is furnished under a license and may be used
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	6	only in accordance with the terms of that license and with the
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	7	inclusion of the above copyright notice. This software may not
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	8	be provided or otherwise made available to, or used by, any
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	9	other person. No title to or ownership of the software is
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	10	hereby transferred.
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	11	"
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	12	"{ Package: 'stx:libbasic' }"
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	13
7630 fced37c5cccc Undo previous change form cg (on his request!). Stefan Vogel <sv@exept.de> parents: 7626 diff changeset	14	GenericException subclass:#ControlInterrupt
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	15	instanceVariableNames: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	16	classVariableNames: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	17	poolDictionaries: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	18	category: 'Kernel-Exceptions-Control'
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	19	!
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	20
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	21	!ControlInterrupt class methodsFor:'documentation'!
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	22
7588 1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	23	copyright
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	24	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	25	COPYRIGHT (c) 2001 by eXept Software AG
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	26	All Rights Reserved
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	27
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	28	This software is furnished under a license and may be used
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	29	only in accordance with the terms of that license and with the
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	30	inclusion of the above copyright notice. This software may not
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	31	be provided or otherwise made available to, or used by, any
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	32	other person. No title to or ownership of the software is
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	33	hereby transferred.
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	34	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	35	!
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 7232 diff changeset	36
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	37	documentation
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	38	"
7232 1d05a293b8b0 comments Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	39	Parent of all control-related interrupts (halt, breakpoint etc.)
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	40	"
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 6200 diff changeset	41	! !
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	42
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	43
15190 88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	44	!ControlInterrupt class methodsFor:'initialization'!
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	45
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	46	initialize
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	47	NotifierString := 'control interrupted'.
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	48
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	49	"
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	50	self initialize
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	51	"
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	52	! !
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	53
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	54
6200 65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	55	!ControlInterrupt class methodsFor:'testing'!
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	56
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	57	isControlInterrupt
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	58	^ true
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	59
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	60	"Created: / 16.11.2001 / 16:11:11 / cg"
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	61	! !
65f0631e5221 added #isControlInterrupt Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	62
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15190 diff changeset	63
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	64	!ControlInterrupt class methodsFor:'documentation'!
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	65
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	66	version
15190 88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	67	^ '$Header: /cvs/stx/stx/libbasic/ControlInterrupt.st,v 1.8 2013-04-27 10:13:40 cg Exp $'
17865 598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	68	!
598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	69
598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	70	version_SVN
17911 a99f15c5efa5 Updated with /trunk Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17910 diff changeset	71	^ '$Id: ControlInterrupt.st 10761 2012-01-19 11:46:00Z vranyj1 $'
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	72	! !
15190 88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	73
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	74
88ce648f5e0b class: ControlInterrupt Claus Gittinger <cg@exept.de> parents: 7630 diff changeset	75	ControlInterrupt initialize!

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Tue, 22 Sep 2015 16:28:42 +0100
branch	jv
changeset 18759	c1217211909c
parent 18057	8da7c39a6322
child 19811	65fec19facb0
permissions	-rw-r--r--