hg/stx-libcomp: Decompiler.st@d69fc5970cd7 (annotated)

0 7ad01559b262 Initial revision claus parents: diff changeset	1	"
4 f6fd83437415 * empty log message * claus parents: 3 diff changeset	2	COPYRIGHT (c) 1991 by Claus Gittinger
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	3	All Rights Reserved
0 7ad01559b262 Initial revision claus parents: diff changeset	4
7ad01559b262 Initial revision claus parents: diff changeset	5	This software is furnished under a license and may be used
7ad01559b262 Initial revision claus parents: diff changeset	6	only in accordance with the terms of that license and with the
7ad01559b262 Initial revision claus parents: diff changeset	7	inclusion of the above copyright notice. This software may not
7ad01559b262 Initial revision claus parents: diff changeset	8	be provided or otherwise made available to, or used by, any
7ad01559b262 Initial revision claus parents: diff changeset	9	other person. No title to or ownership of the software is
7ad01559b262 Initial revision claus parents: diff changeset	10	hereby transferred.
7ad01559b262 Initial revision claus parents: diff changeset	11	"
7ad01559b262 Initial revision claus parents: diff changeset	12
1140 40bb7432cea2 * empty log message * Claus Gittinger <cg@exept.de> parents: 767 diff changeset	13	"{ Package: 'stx:libcomp' }"
40bb7432cea2 * empty log message * Claus Gittinger <cg@exept.de> parents: 767 diff changeset	14
0 7ad01559b262 Initial revision claus parents: diff changeset	15	ByteCodeCompiler subclass:#Decompiler
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	16	instanceVariableNames:'hasLineNo bytes literals index listStream outputStream'
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	17	classVariableNames:''
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	18	poolDictionaries:''
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	19	category:'System-Compiler'
0 7ad01559b262 Initial revision claus parents: diff changeset	20	!
7ad01559b262 Initial revision claus parents: diff changeset	21
378 450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	22	!Decompiler class methodsFor:'documentation'!
0 7ad01559b262 Initial revision claus parents: diff changeset	23
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	24	copyright
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	25	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	26	COPYRIGHT (c) 1991 by Claus Gittinger
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	27	All Rights Reserved
0 7ad01559b262 Initial revision claus parents: diff changeset	28
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	29	This software is furnished under a license and may be used
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	30	only in accordance with the terms of that license and with the
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	31	inclusion of the above copyright notice. This software may not
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	32	be provided or otherwise made available to, or used by, any
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	33	other person. No title to or ownership of the software is
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	34	hereby transferred.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	35	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	36	!
0 7ad01559b262 Initial revision claus parents: diff changeset	37
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	38	documentation
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	39	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	40	only for stx-debugging. Not for public eyes.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	41
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	42	Decompiler decompile:(someClass compiledMethodAt:#someSelector)
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	43	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	44	! !
0 7ad01559b262 Initial revision claus parents: diff changeset	45
378 450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	46	!Decompiler class methodsFor:'decompiling'!
0 7ad01559b262 Initial revision claus parents: diff changeset	47
7ad01559b262 Initial revision claus parents: diff changeset	48	decompile:aMethod
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	49	^ (self new) decompile:aMethod to:Transcript
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	50
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	51	"
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	52	Decompiler decompile:(FileBrowser compiledMethodAt:#initialize)
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	53	Decompiler decompile:(Decompiler compiledMethodAt:#decompile:to:)
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	54	"
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	55
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	56	"Modified: 16.4.1996 / 20:26:01 / cg"
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	57	!
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	58
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	59	decompile:aMethod to:aStream
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	60	^ (self new) decompile:aMethod to:aStream
0 7ad01559b262 Initial revision claus parents: diff changeset	61
7ad01559b262 Initial revision claus parents: diff changeset	62	"Decompiler decompile:(FileBrowser compiledMethodAt:#initialize)"
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	63
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	64	"Created: 16.4.1996 / 20:25:55 / cg"
0 7ad01559b262 Initial revision claus parents: diff changeset	65	! !
7ad01559b262 Initial revision claus parents: diff changeset	66
7ad01559b262 Initial revision claus parents: diff changeset	67	!Decompiler methodsFor:'decompiling'!
7ad01559b262 Initial revision claus parents: diff changeset	68
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	69	decompile:aMethod to:aStream
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	70	\|nBytes offs byte sym sel lineNr who method insnIndex1 insnIndex2 n\|
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	71
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	72	listStream := nil.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	73	outputStream := aStream.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	74
384 92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	75	(method := aMethod) isNil ifTrue:[
278 8c8c96856b41 showCr: -> showCR: Claus Gittinger <cg@exept.de> parents: 250 diff changeset	76	aStream showCR:'nil method'.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	77	^ self
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	78	].
384 92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	79	method isWrapped ifTrue:[
92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	80	method := method originalMethod
92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	81	].
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	82
1360 602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	83	aStream cr.
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	84	aStream show:'decompiling '.
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	85
384 92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	86	who := method who.
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	87	who notNil ifTrue:[
408 d36f5c1c6686 checkin from browser Claus Gittinger <cg@exept.de> parents: 401 diff changeset	88	classToCompileFor := who at:1.
1360 602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	89	aStream showCR:(classToCompileFor name , '>>' , (who at:2) , ':').
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	90	].
1360 602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	91	aStream show:('nA: ' , method numArgs printString).
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	92	aStream show:(' nV: ' , method numVars printString).
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	93	aStream show:(' nT: ' , method stackSize printString).
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	94	aStream cr.
602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	95	aStream cr.
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	96
384 92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	97	bytes := method byteCode.
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	98	bytes isNil ifTrue:[
740 6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	99	method isLazyMethod ifTrue:[
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	100	method := method asExecutableMethod.
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	101	bytes := method byteCode.
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	102	aStream showCR:'(lazyMethod; showing resulting code when compiled on first invokation)'.
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	103	aStream cr.
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	104	].
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	105	].
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	106	bytes isNil ifTrue:[
278 8c8c96856b41 showCr: -> showCR: Claus Gittinger <cg@exept.de> parents: 250 diff changeset	107	aStream showCR:'no bytecode'.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	108	^ self
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	109	].
384 92c963b7922b handle decompilation of wrapped methods Claus Gittinger <cg@exept.de> parents: 378 diff changeset	110	literals := method literals.
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	111	index := 1.
d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	112	nBytes := bytes size.
d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	113	[index <= nBytes] whileTrue:[
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	114	listStream := '' writeStream.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	115
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	116	self showPC.
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	117	insnIndex1 := index.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	118
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	119	sym := self symbolicCodeFor:(bytes at:index).
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	120	listStream show:sym.
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	121	"
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	122	extra notNil ifTrue:[Transcript show:(extra printString)].
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	123	"
347 c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	124	index := index + 1.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	125	hasLineNo ifTrue:[
347 c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	126	lineNr := bytes at:index.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	127	index := index + 1.
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	128	] ifFalse:[
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	129	lineNr := nil
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	130	].
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	131	extra notNil ifTrue:[
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	132	listStream show:' '.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	133	byte := bytes at:index.
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	134
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	135	"compute argument showXXX selector from extra ..."
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	136
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	137	sel := 'show' , extra , ':'.
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	138	sel at:5 put:(sel at:5) asUppercase.
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	139	self perform:sel asSymbol with:byte
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	140	].
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	141	insnIndex2 := index-1.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	142
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	143	insnIndex1 to:insnIndex2 do:[:i \|
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	144	outputStream show:((bytes at:i) printStringRadix:16 size:2 fill:$0).
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	145	outputStream show:' '.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	146	].
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	147	n := (insnIndex2-insnIndex1) * 3.
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	148	outputStream spaces:(5*3 - n).
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	149	outputStream show:(listStream contents).
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	150
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	151	lineNr notNil ifTrue:[
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	152	aStream show:'['; show:lineNr; show:']'
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	153	].
278 8c8c96856b41 showCr: -> showCR: Claus Gittinger <cg@exept.de> parents: 250 diff changeset	154	aStream showCR:''
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	155	]
206 d4cd6769b983 * empty log message * Claus Gittinger <cg@exept.de> parents: 205 diff changeset	156
740 6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	157	"Created: / 16.4.1996 / 20:27:18 / cg"
6936f116c334 checkin from browser Claus Gittinger <cg@exept.de> parents: 655 diff changeset	158	"Modified: / 10.7.1998 / 16:55:46 / cg"
0 7ad01559b262 Initial revision claus parents: diff changeset	159	!
7ad01559b262 Initial revision claus parents: diff changeset	160
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	161	showAbsOffset:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	162	\|offs b2\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	163
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	164	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	165	b2 := (bytes at:index).
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	166	offs := byte + (b2 bitShift:8).
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	167	index := index + 1.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	168	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	169	listStream show:' ('.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	170	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	171	listStream show:')'
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	172
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	173	"Modified: 16.4.1996 / 20:27:53 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	174	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	175
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	176	showAbsOffsetLevel:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	177	\|offs b2\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	178
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	179	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	180	b2 := (bytes at:index).
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	181	offs := byte + (b2 bitShift:8).
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	182	index := index + 1.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	183	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	184	listStream show:' ('.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	185	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	186	listStream show:')'.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	187	self showNvarNargsAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	188	index := index + 2
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	189
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	190	"Modified: 16.4.1996 / 20:27:57 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	191	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	192
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	193	showIndex:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	194	listStream show:byte printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	195	index := index + 1
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	196
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	197	"Modified: 16.4.1996 / 20:27:59 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	198	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	199
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	200	showIndexLevel:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	201	self showIndex:byte.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	202	self showNvarNargsAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	203	index := index + 2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	204	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	205
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	206	showInstvarIndex:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	207	listStream show:byte printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	208	classToCompileFor notNil ifTrue:[
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	209	listStream show:'('.
763 d3cc2d32a20d dont crash for invalid instvar index. tm parents: 740 diff changeset	210	listStream show:(classToCompileFor allInstVarNames at:byte ifAbsent:'???? [' , byte printString ,']').
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	211	listStream show:')'.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	212	].
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	213	index := index + 1
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	214
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	215	"Modified: 16.4.1996 / 20:28:06 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	216	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	217
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	218	showLevelIndex:byte
1148 a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	219	\|lvl idx\|
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	220
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	221	lvl := byte.
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	222	index := index + 1.
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	223	idx := bytes at:index.
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	224
a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	225	listStream show:idx printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	226	index := index + 1.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	227
1148 a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	228	listStream show:' lvl: '; show:lvl printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	229	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	230
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	231	showLineNo:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	232	listStream show:' line:' , byte printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	233	index := index + 1
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	234
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	235	"Modified: 16.4.1996 / 20:28:10 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	236	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	237
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	238	showLit1:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	239	self showLit:1
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	240	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	241
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	242	showLit2:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	243	self showLit:2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	244	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	245
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	246	showLit3:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	247	self showLit:3
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	248	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	249
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	250	showLit4:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	251	self showLit:4
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	252	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	253
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	254	showLit5:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	255	self showLit:5
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	256	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	257
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	258	showLit6:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	259	self showLit:6
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	260	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	261
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	262	showLit7:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	263	self showLit:7
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	264	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	265
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	266	showLit8:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	267	self showLit:8
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	268	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	269
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	270	showLit9:ignored
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	271	self showLit:9
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	272	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	273
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	274	showLit:litIndex
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	275	\|lit\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	276
573 7aadeb921f21 checkin from browser Claus Gittinger <cg@exept.de> parents: 551 diff changeset	277	lit := literals at:litIndex ifAbsent:'* badIndex *'.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	278	lit isBehavior ifTrue:[
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	279	listStream show:lit name
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	280	] ifFalse:[
378 450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	281	lit isBlock ifTrue:[
450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	282	listStream show:'[a block]'
450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	283	] ifFalse:[
450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	284	listStream show:lit storeString
450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	285	]
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	286	]
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	287
573 7aadeb921f21 checkin from browser Claus Gittinger <cg@exept.de> parents: 551 diff changeset	288	"Modified: 2.7.1997 / 11:35:42 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	289	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	290
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	291	showLiteral16:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	292	\|litIndex\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	293
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	294	litIndex := bytes wordAt:index MSB:false.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	295	self showLit:litIndex.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	296	index := index + 2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	297	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	298
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	299	showLiteral:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	300	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	301	self showLit:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	302	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	303
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	304	showLiteralAt:index
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	305	\|offs\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	306
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	307	offs := bytes at:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	308	self showLit:offs
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	309	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	310
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	311	showLongOffset:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	312	\|offs\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	313
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	314	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	315	(byte > 127) ifTrue:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	316	offs := byte - 256 - 128
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	317	] ifFalse:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	318	offs := byte + 128
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	319	].
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	320	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	321	listStream show:' ('.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	322	listStream show:(index + offs) printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	323	listStream show:')'
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	324
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	325	"Modified: 16.4.1996 / 20:28:30 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	326	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	327
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	328	showLongOffsetLevel:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	329	self showLongOffset:byte.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	330	self showNvarNargsAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	331	index := index + 2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	332	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	333
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	334	showLsendArgs:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	335	\|litIndex\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	336
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	337	listStream show:byte printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	338	listStream show:' '.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	339	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	340	litIndex := bytes wordAt:index MSB:false.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	341	listStream show:(literals at:litIndex) printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	342	index := index + 2
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	343
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	344	"Modified: 16.4.1996 / 20:28:35 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	345	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	346
1141 87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	347	showLsuperSendArgs:byte
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	348	\|litIndex\|
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	349
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	350	listStream show:byte printString.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	351	listStream show:' '.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	352	index := index + 1.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	353	litIndex := bytes wordAt:index MSB:false.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	354	listStream show:(literals at:litIndex) printString.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	355	index := index + 2.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	356
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	357	litIndex := bytes wordAt:index MSB:false.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	358	listStream show:(literals at:litIndex) printString.
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	359	index := index + 2
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	360	!
87c9fb0b53e0 * empty log message * Claus Gittinger <cg@exept.de> parents: 1140 diff changeset	361
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	362	showNumber16:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	363	listStream show:(bytes signedWordAt:index MSB:false) printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	364	index := index + 2
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	365
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	366	"Modified: 16.4.1996 / 20:28:37 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	367	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	368
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	369	showNumber:byte
767 9a99b6810f94 checkin from browser Claus Gittinger <cg@exept.de> parents: 763 diff changeset	370	listStream show:byte signExtendedByteValue printString.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	371	index := index + 1
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	372
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	373	"Modified: 16.4.1996 / 20:28:38 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	374	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	375
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	376	showNvarNargsAt:index
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	377	listStream show:' nv='.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	378	listStream show:(bytes at:index) printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	379	listStream show:' na='.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	380	listStream show:(bytes at:(index + 1)) printString
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	381
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	382	"Modified: 16.4.1996 / 20:28:40 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	383	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	384
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	385	showOffset:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	386	\|offs\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	387
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	388	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	389	(byte > 127) ifTrue:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	390	offs := byte - 256
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	391	] ifFalse:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	392	offs := byte
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	393	].
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	394	listStream show:(offs printString).
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	395	listStream show:' ('.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	396	listStream show:(index + offs) printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	397	listStream show:')'
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	398
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	399	"Modified: 16.4.1996 / 20:28:43 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	400	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	401
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	402	showOffsetLevel:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	403	self showOffset:byte.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	404	self showNvarNargsAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	405	index := index + 2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	406	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	407
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	408	showPC
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	409	outputStream show:(index printStringRadix:10 size:3 fill:(Character space)).
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	410	outputStream show:': '.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	411
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	412	"Modified: 4.6.1997 / 12:07:33 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	413	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	414
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	415	showSendArgs:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	416	listStream show:byte printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	417	listStream show:' '.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	418	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	419	self showLiteralAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	420	index := index + 1
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	421
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	422	"Modified: 16.4.1996 / 20:28:50 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	423	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	424
246 abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	425	showSpecialGlobal:byte
abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	426	\|specialIndex\|
abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	427
abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	428	specialIndex := bytes at:index.
abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	429	index := index + 1.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	430	"/ listStream show:specialIndex printString.
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	431
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	432	listStream
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	433	show:((self specialGlobals) at:specialIndex + 1)
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	434
4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	435	"Modified: 4.6.1997 / 12:18:45 / cg"
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	436	!
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	437
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	438	showSpecialSend:byte
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	439	\|specialIndex\|
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	440
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	441	specialIndex := bytes at:index.
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	442	index := index + 1.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	443	"/ listStream show:specialIndex printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	444	listStream show:'#'.
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	445	listStream show:((self specialSends) at:specialIndex + 1)
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	446
532 4fcfc17f14b4 show all bytes of an op Claus Gittinger <cg@exept.de> parents: 408 diff changeset	447	"Modified: 4.6.1997 / 12:34:01 / cg"
246 abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	448	!
abf09d4821fe new code for faster global pushes Claus Gittinger <cg@exept.de> parents: 217 diff changeset	449
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	450	showSuperSendArgs:byte
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	451	listStream show:byte printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	452	listStream show:' '.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	453	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	454	self showLiteralAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	455	index := index + 1.
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	456	listStream show:' '.
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	457	self showLiteralAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	458	index := index + 1
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	459
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	460	"Modified: 16.4.1996 / 20:28:58 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	461	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	462
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	463	showVeryLongOffset:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	464	\|offs\|
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	465
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	466	index := index + 1.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	467	(byte > 127) ifTrue:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	468	offs := byte - 256 - 256
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	469	] ifFalse:[
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	470	offs := byte + 256
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	471	].
293 bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	472	listStream show:offs printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	473	listStream show:' ('.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	474	listStream show:(index + offs) printString.
bc0459613b27 * empty log message * Claus Gittinger <cg@exept.de> parents: 278 diff changeset	475	listStream show:')'
250 6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	476
6c26bc3fb154 allow decompile onto a stream Claus Gittinger <cg@exept.de> parents: 246 diff changeset	477	"Modified: 16.4.1996 / 20:29:00 / cg"
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	478	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	479
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	480	showVeryLongOffsetLevel:byte
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	481	self showVeryLongOffset:byte.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	482	self showNvarNargsAt:index.
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	483	index := index + 2
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	484	!
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	485
0 7ad01559b262 Initial revision claus parents: diff changeset	486	symbolicCodeFor:aByte
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	487	\|syms extras lnos sym\|
0 7ad01559b262 Initial revision claus parents: diff changeset	488
7ad01559b262 Initial revision claus parents: diff changeset	489	syms := #( retTop " 0 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	490	retNil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	491	retTrue
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	492	retFalse
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	493	ret0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	494	retSelf " 5 "
551 a8a0377b9ceb added #over Claus Gittinger <cg@exept.de> parents: 532 diff changeset	495	over
344 ab8b2921d475 fixed homeRet decoding Claus Gittinger <cg@exept.de> parents: 342 diff changeset	496	homeRetTop
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	497	LINE
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	498	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	499	pushNil " 10 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	500	pushTrue
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	501	pushFalse
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	502	sendSelf
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	503	pushLit
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	504	pushSelf " 15 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	505	pushNum
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	506	pushNum16
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	507	drop
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	508	send
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	509	superSend " 20 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	510	send0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	511	send1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	512	send2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	513	send3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	514	sendDrop " 25 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	515	sendDrop0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	516	sendDrop1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	517	sendDrop2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	518	sendDrop3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	519	pushMethodArg " 30 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	520	pushMethodVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	521	pushBlockArg
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	522	pushBlockVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	523	pushInstVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	524	pushClassVar " 35 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	525	pushGlobal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	526	storeMethodVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	527	storeBlockVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	528	storeInstVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	529	storeClassVar " 40 "
356 bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	530	storeGlobal
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	531	pushOuterBlockArg
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	532	pushOuter1BlockArg
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	533	pushOuter2BlockArg
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	534	equal " 45 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	535	notEqual
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	536	dup
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	537	equal0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	538	notEqual0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	539	falseJump " 50 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	540	trueJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	541	nilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	542	notNilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	543	jump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	544	makeBlock " 55 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	545	zeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	546	notZeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	547	eqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	548	notEqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	549	falseJump " 60 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	550	trueJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	551	nilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	552	notNilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	553	jump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	554	makeBlock " 65 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	555	zeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	556	notZeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	557	eqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	558	notEqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	559	falseJump " 70 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	560	trueJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	561	nilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	562	notNilJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	563	jump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	564	makeBlock " 75 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	565	zeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	566	notZeroJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	567	eqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	568	notEqJump
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	569	pushMethodVar1 " 80 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	570	pushMethodVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	571	pushMethodVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	572	pushMethodVar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	573	pushMethodVar5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	574	pushMethodVar6 " 85 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	575	pushMethodArg1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	576	pushMethodArg2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	577	pushMethodArg3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	578	pushMethodArg4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	579	pushInstVar1 " 90 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	580	pushInstVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	581	pushInstVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	582	pushInstVar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	583	pushInstVar5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	584	pushInstVar6 " 95 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	585	pushInstVar7
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	586	pushInstVar8
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	587	pushInstVar9
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	588	pushInstVar10
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	589	storeMethodVar1 " 100 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	590	storeMethodVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	591	storeMethodVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	592	storeMethodVar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	593	storeMethodVar5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	594	storeMethodVar6 " 105 "
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	595	nil
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	596	nil
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	597	nil
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	598	nil
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	599	storeInstVar1 " 110 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	600	storeInstVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	601	storeInstVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	602	storeInstVar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	603	storeInstVar5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	604	storeInstVar6 " 115 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	605	storeInstVar7
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	606	storeInstVar8
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	607	storeInstVar9
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	608	storeInstVar10
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	609	push0 " 120 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	610	push1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	611	pushMinus1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	612	sendPlus1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	613	sendMinus1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	614	incMethodVar " 125 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	615	decMethodVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	616	retNum
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	617	pushOuterBlockVar "16r80"
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	618	storeOuterBlockVar
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	619	'send1 #=' " 130 "
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	620	'send1 #+'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	621	'send1 #~='
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	622	'send1 #-'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	623	'send0 #class'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	624	'send1 #at:' " 135 "
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	625	'send2 #at:put:'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	626	'send1 #bitAnd:'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	627	'send1 #bitOr:'
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	628	push2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	629	pushBlockArg1 " 140 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	630	pushBlockArg2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	631	pushBlockArg3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	632	pushBlockArg4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	633	pushContext "16r90"
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	634	'send1 #>' " 145 "
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	635	'send1 #>='
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	636	'send1 #<'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	637	'send1 #<='
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	638	nil
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	639	nil " 150 "
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	640	'send0 #value'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	641	'send1 #value:'
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	642	'send0 #size'
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	643	nil
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	644	nil " 155 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	645	make0Block
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	646	makeNILBlock
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	647	nil " 158 "
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	648	nil " 159 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	649	retMvar1 " 160 " "16rA0"
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	650	retMvar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	651	retMvar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	652	retMvar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	653	retMvar5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	654	retMvar6 " 165 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	655	retIvar1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	656	retIvar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	657	retIvar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	658	retIvar4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	659	retIvar5 " 170 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	660	retIvar6
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	661	retIvar7
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	662	retIvar8
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	663	retMarg1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	664	retMarg2 " 175 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	665	pushClassInstVar
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	666	storeClassInstVar
1140 40bb7432cea2 * empty log message * Claus Gittinger <cg@exept.de> parents: 767 diff changeset	667	'send2 #value:value:'
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	668	not
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	669	sendSelf0 " 180 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	670	sendSelf1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	671	sendSelf2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	672	sendSelf3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	673	sendSelfDrop0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	674	sendSelfDrop1 " 185 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	675	sendSelfDrop2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	676	sendSelfDrop3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	677	isNil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	678	notNil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	679	falseJumpAbs " 190 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	680	trueJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	681	nilJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	682	notNilJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	683	jumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	684	makeBlockAbs " 195 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	685	zeroJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	686	notZeroJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	687	eqJumpAbs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	688	notEqJumpAbs " 199 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	689	pushGlobal " 200 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	690	pushLLit
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	691	jmpFalseL
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	692	jmpTrueL
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	693	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	694	lsend " 205 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	695	lsuperSend
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	696	lsendSelf
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	697	pushGT0
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	698	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	699	sendArrayNew " 210 "
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	700	'send0 #basicNew'
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	701	sendGT0
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	702	'send0 #new'
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	703	sendBasicNewN
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	704	sendNewN " 215 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	705	sendLogAnd
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	706	sendLogOr
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	707	pushGlobL
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	708	storeGlobL
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	709	nil " 220 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	710	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	711	pushLit1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	712	pushLit2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	713	pushLit3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	714	pushLit4
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	715	pushLit5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	716	pushLit6
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	717	pushLit7
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	718	pushLit8
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	719	'send1 #*' " 230 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	720	sendSpecial " 231 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	721	pushBlockVar1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	722	pushBlockVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	723	pushBlockVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	724	storeBlockVar1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	725	storeBlockVar2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	726	storeBlockVar3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	727	refCheck
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	728	pushLocal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	729	storeLocal " 240 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	730	).
0 7ad01559b262 Initial revision claus parents: diff changeset	731
7ad01559b262 Initial revision claus parents: diff changeset	732	lnos := #( false " 0 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	733	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	734	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	735	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	736	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	737	false " 5 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	738	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	739	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	740	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	741	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	742	false " 10 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	743	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	744	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	745	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	746	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	747	false " 15 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	748	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	749	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	750	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	751	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	752	true " 20 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	753	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	754	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	755	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	756	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	757	true " 25 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	758	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	759	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	760	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	761	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	762	false " 30 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	763	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	764	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	765	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	766	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	767	false " 35 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	768	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	769	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	770	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	771	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	772	false " 40 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	773	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	774	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	775	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	776	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	777	false " 45 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	778	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	779	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	780	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	781	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	782	false " 50 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	783	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	784	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	785	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	786	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	787	false " 55 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	788	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	789	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	790	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	791	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	792	false " 60 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	793	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	794	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	795	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	796	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	797	false " 65 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	798	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	799	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	800	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	801	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	802	false " 70 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	803	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	804	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	805	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	806	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	807	false " 75 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	808	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	809	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	810	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	811	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	812	false " 80 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	813	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	814	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	815	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	816	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	817	false " 85 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	818	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	819	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	820	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	821	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	822	false " 90 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	823	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	824	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	825	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	826	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	827	false " 95 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	828	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	829	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	830	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	831	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	832	false " 100 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	833	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	834	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	835	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	836	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	837	false " 105 "
347 c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	838	true
c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	839	true
c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	840	true
c41b9c9c0e50 oops - sendWIDTH & sendHEIGHT have lineNumber info Claus Gittinger <cg@exept.de> parents: 344 diff changeset	841	true
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	842	false " 110 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	843	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	844	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	845	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	846	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	847	false " 115 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	848	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	849	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	850	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	851	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	852	false " 120 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	853	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	854	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	855	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	856	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	857	true " 125 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	858	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	859	false
1148 a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	860	false "/ 128 pushOuterBlockVar
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	861	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	862	true " 130 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	863	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	864	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	865	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	866	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	867	true " 135 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	868	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	869	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	870	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	871	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	872	false " 140 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	873	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	874	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	875	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	876	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	877	true " 145 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	878	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	879	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	880	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	881	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	882	true " 150 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	883	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	884	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	885	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	886	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	887	true " 155 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	888	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	889	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	890	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	891	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	892	false " 160 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	893	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	894	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	895	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	896	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	897	false " 165 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	898	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	899	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	900	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	901	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	902	false " 170 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	903	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	904	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	905	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	906	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	907	false " 175 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	908	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	909	false
1140 40bb7432cea2 * empty log message * Claus Gittinger <cg@exept.de> parents: 767 diff changeset	910	true
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	911	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	912	true " 180 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	913	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	914	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	915	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	916	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	917	true " 185 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	918	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	919	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	920	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	921	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	922	false " 190 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	923	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	924	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	925	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	926	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	927	false " 195 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	928	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	929	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	930	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	931	false " 199 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	932	false " 200 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	933	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	934	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	935	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	936	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	937	true " 205 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	938	true
1258 138039453522 * empty log message * Claus Gittinger <cg@exept.de> parents: 1148 diff changeset	939	true
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	940	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	941	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	942	false " 210 " " arrayNew "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	943	true " basicNew "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	944	true " > 0 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	945	true " new "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	946	true " basicNew: "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	947	true " 215 " " new: "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	948	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	949	true
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	950	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	951	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	952	false " 220 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	953	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	954	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	955	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	956	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	957	false " 225 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	958	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	959	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	960	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	961	false " 229 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	962	true " 230 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	963	true " 231 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	964	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	965	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	966	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	967	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	968	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	969	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	970	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	971	false
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	972	false " 240 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	973	).
0 7ad01559b262 Initial revision claus parents: diff changeset	974
7ad01559b262 Initial revision claus parents: diff changeset	975	extras := #(nil " 0 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	976	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	977	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	978	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	979	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	980	nil " 5 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	981	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	982	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	983	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	984	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	985	nil " 10 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	986	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	987	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	988	sendArgs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	989	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	990	nil " 15 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	991	number
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	992	number16
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	993	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	994	sendArgs
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	995	superSendArgs " 20 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	996	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	997	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	998	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	999	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1000	sendArgs " 25 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1001	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1002	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1003	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1004	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1005	index " 30 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1006	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1007	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1008	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1009	instvarIndex
356 bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1010	literal " 35 "
bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1011	literal
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1012	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1013	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1014	instvarIndex
356 bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1015	literal " 40 "
bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1016	literal
573 7aadeb921f21 checkin from browser Claus Gittinger <cg@exept.de> parents: 551 diff changeset	1017	levelIndex
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1018	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1019	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1020	nil " 45 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1021	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1022	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1023	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1024	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1025	offset " 50 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1026	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1027	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1028	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1029	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1030	offsetLevel " 55 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1031	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1032	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1033	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1034	offset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1035	longOffset " 60 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1036	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1037	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1038	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1039	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1040	longOffsetLevel " 65 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1041	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1042	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1043	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1044	longOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1045	veryLongOffset " 70 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1046	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1047	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1048	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1049	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1050	veryLongOffsetLevel " 75 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1051	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1052	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1053	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1054	veryLongOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1055	nil " 80 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1056	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1057	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1058	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1059	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1060	nil " 85 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1061	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1062	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1063	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1064	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1065	nil " 90 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1066	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1067	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1068	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1069	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1070	nil " 95 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1071	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1072	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1073	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1074	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1075	nil " 100 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1076	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1077	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1078	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1079	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1080	nil " 105 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1081	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1082	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1083	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1084	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1085	nil " 110 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1086	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1087	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1088	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1089	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1090	nil " 115 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1091	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1092	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1093	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1094	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1095	nil " 120 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1096	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1097	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1098	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1099	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1100	index " 125 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1101	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1102	number
1148 a008a06fbbc5 * empty log message * Claus Gittinger <cg@exept.de> parents: 1141 diff changeset	1103	levelIndex "/ 128 pushOuterBlockVar
573 7aadeb921f21 checkin from browser Claus Gittinger <cg@exept.de> parents: 551 diff changeset	1104	levelIndex
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1105	nil " 130 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1106	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1107	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1108	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1109	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1110	nil " 135 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1111	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1112	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1113	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1114	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1115	nil " 140 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1116	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1117	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1118	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1119	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1120	nil " 145 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1121	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1122	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1123	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1124	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1125	nil " 150 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1126	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1127	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1128	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1129	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1130	nil " 155 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1131	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1132	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1133	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1134	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1135	nil " 160 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1136	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1137	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1138	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1139	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1140	nil " 165 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1141	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1142	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1143	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1144	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1145	nil " 170 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1146	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1147	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1148	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1149	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1150	nil " 175 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1151	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1152	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1153	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1154	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1155	literal " 180 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1156	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1157	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1158	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1159	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1160	literal " 185 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1161	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1162	literal
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1163	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1164	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1165	absOffset " 190 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1166	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1167	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1168	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1169	absOffset
573 7aadeb921f21 checkin from browser Claus Gittinger <cg@exept.de> parents: 551 diff changeset	1170	absOffsetLevel " 195 "
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1171	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1172	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1173	absOffset
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1174	absOffset " 199 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1175	specialGlobal " 200 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1176	literal16
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1177	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1178	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1179	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1180	lsendArgs " 205 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1181	lsuperSendArgs
1258 138039453522 * empty log message * Claus Gittinger <cg@exept.de> parents: 1148 diff changeset	1182	lsendArgs
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1183	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1184	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1185	nil " 210 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1186	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1187	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1188	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1189	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1190	nil " 215 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1191	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1192	nil
356 bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1193	literal16
bb3beb18de1f 6empty slots in GLOBL/CLASSVAR bytecodes removed Claus Gittinger <cg@exept.de> parents: 347 diff changeset	1194	literal16
342 fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1195	nil " 220 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1196	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1197	lit1
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1198	lit2
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1199	lit3
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1200	lit4 " 225 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1201	lit5
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1202	lit6
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1203	lit7
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1204	lit8
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1205	nil " 230 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1206	specialSend " 231 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1207	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1208	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1209	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1210	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1211	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1212	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1213	nil
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1214	index
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1215	index " 240 "
fe32a900f0a3 checkin from browser Claus Gittinger <cg@exept.de> parents: 331 diff changeset	1216	).
0 7ad01559b262 Initial revision claus parents: diff changeset	1217
401 f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1218	sym := syms at:(aByte + 1).
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1219	sym isNil ifTrue:[
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1220	extra := nil.
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1221	hasLineNo := nil.
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1222	] ifFalse:[
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1223	extra := extras at:(aByte + 1).
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1224	hasLineNo := lnos at:(aByte + 1).
f85fe04ce607 changes for special sends Claus Gittinger <cg@exept.de> parents: 384 diff changeset	1225	].
0 7ad01559b262 Initial revision claus parents: diff changeset	1226	^ syms at:(aByte + 1)
164 b511f22fea3b * empty log message * Claus Gittinger <cg@exept.de> parents: 135 diff changeset	1227
655 3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	1228	"Modified: / 2.9.1995 / 00:12:11 / claus"
3dcaf2f42818 checkin from browser Claus Gittinger <cg@exept.de> parents: 573 diff changeset	1229	"Modified: / 5.3.1998 / 04:35:28 / cg"
0 7ad01559b262 Initial revision claus parents: diff changeset	1230	! !
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	1231
378 450a65b641b2 checkin from browser Claus Gittinger <cg@exept.de> parents: 356 diff changeset	1232	!Decompiler class methodsFor:'documentation'!
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	1233
eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	1234	version
1360 602caf902ede checkin from browser Claus Gittinger <cg@exept.de> parents: 1258 diff changeset	1235	^ '$Header: /cvs/stx/stx/libcomp/Decompiler.st,v 1.37 2003-01-26 14:02:38 cg Exp $'
217 eba0ee7232aa new opcodes Claus Gittinger <cg@exept.de> parents: 206 diff changeset	1236	! !

author	Claus Gittinger <cg@exept.de>
	Wed, 29 Oct 2003 11:45:21 +0100
changeset 1472	d69fc5970cd7
parent 1360	602caf902ede
child 1789	7d38fabe0785
permissions	-rw-r--r--