hg/stx-libbasic: HaltInterrupt.st@bc3d3101c493 (annotated)

7588 1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	1	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	2	COPYRIGHT (c) 2001 by eXept Software AG
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	3	All Rights Reserved
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	4
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	5	This software is furnished under a license and may be used
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 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: 6207 diff changeset	7	inclusion of the above copyright notice. This software may not
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	8	be provided or otherwise made available to, or used by, any
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	9	other person. No title to or ownership of the software is
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	10	hereby transferred.
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 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
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	14	ControlInterrupt subclass:#HaltInterrupt
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 diff changeset	15	instanceVariableNames: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 diff changeset	16	classVariableNames: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 diff changeset	17	poolDictionaries: ''
8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 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: 5970 diff changeset	21	!HaltInterrupt class methodsFor:'documentation'!
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	22
7588 1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	23	copyright
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	24	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	25	COPYRIGHT (c) 2001 by eXept Software AG
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	26	All Rights Reserved
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	27
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	28	This software is furnished under a license and may be used
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 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: 6207 diff changeset	30	inclusion of the above copyright notice. This software may not
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	31	be provided or otherwise made available to, or used by, any
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	32	other person. No title to or ownership of the software is
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	33	hereby transferred.
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	34	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	35	!
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	36
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	37	documentation
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	38	"
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	39	Raised by the #halt methods.
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	40	A programmed debug-breakpoint.
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	41	"
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	42	! !
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	43
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 diff changeset	44
15189 cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	45	!HaltInterrupt class methodsFor:'initialization'!
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	46
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	47	initialize
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	48	NotifierString := 'halt encountered'.
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	49
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	50	"
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	51	self initialize
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	52	"
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	53	! !
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	54
18057 8da7c39a6322 Merged ac63da6d9b6c and e58049d58d1d (branch default - CVS HEAD) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17911 15189 diff changeset	55
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	56	!HaltInterrupt class methodsFor:'documentation'!
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	57
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	58	version
15189 cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	59	^ '$Header: /cvs/stx/stx/libbasic/HaltInterrupt.st,v 1.4 2013-04-27 10:12:51 cg Exp $'
17865 598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	60	!
598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	61
598963c6ff8e Recommited from itself Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17846 diff changeset	62	version_SVN
17911 a99f15c5efa5 Updated with /trunk Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17910 diff changeset	63	^ '$Id: HaltInterrupt.st 10761 2012-01-19 11:46:00Z vranyj1 $'
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	64	! !
15189 cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	65
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	66
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	67	HaltInterrupt initialize!

author	Merge Script
	Mon, 08 Jun 2015 06:58:54 +0200
branch	jv
changeset 18461	bc3d3101c493
parent 18057	8da7c39a6322
child 19811	65fec19facb0
permissions	-rw-r--r--