hg/stx-libbasic: HaltInterrupt.st@03b083548da2 (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
19710 9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	14	"{ NameSpace: Smalltalk }"
9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	15
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	16	ControlInterrupt subclass:#HaltInterrupt
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	17	instanceVariableNames:''
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	18	classVariableNames:''
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	19	poolDictionaries:''
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	20	category:'Kernel-Exceptions-Control'
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	21	!
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	22
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	23	!HaltInterrupt class methodsFor:'documentation'!
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	24
7588 1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	25	copyright
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	26	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	27	COPYRIGHT (c) 2001 by eXept Software AG
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	28	All Rights Reserved
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	29
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	30	This software is furnished under a license and may be used
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	31	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	32	inclusion of the above copyright notice. This software may not
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	33	be provided or otherwise made available to, or used by, any
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	34	other person. No title to or ownership of the software is
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	35	hereby transferred.
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	36	"
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	37	!
1819a1c408f3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6207 diff changeset	38
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	39	documentation
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	40	"
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	41	Raised by the #halt methods.
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	42	A programmed debug-breakpoint.
19710 9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	43
9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	44	[author:]
9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	45	Claus Gittinger
6207 b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	46	"
b53b64413b40 caetgory change and documentation added Claus Gittinger <cg@exept.de> parents: 5970 diff changeset	47	! !
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	48
15189 cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	49	!HaltInterrupt class methodsFor:'initialization'!
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	initialize
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	52	NotifierString := 'halt encountered'.
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	"
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	55	self initialize
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	56	"
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	57	! !
cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	58
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	59	!HaltInterrupt class methodsFor:'documentation'!
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	60
9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	61	version
19710 9b66b3df7d82 #DOCUMENTATION by cg Claus Gittinger <cg@exept.de> parents: 15189 diff changeset	62	^ '$Header$'
5970 9e695ff6b5b2 initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	63	! !
15189 cf10c0b497f4 class: HaltInterrupt Claus Gittinger <cg@exept.de> parents: 7588 diff changeset	64
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	HaltInterrupt initialize!

author	Claus Gittinger <cg@exept.de>
	Tue, 09 Jul 2019 20:55:17 +0200
changeset 24417	03b083548da2
parent 19710	9b66b3df7d82
child 19811	65fec19facb0
permissions	-rw-r--r--