hg/stx-libcomp: Decompiler.st@9a7dfd547e69 (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
7ad01559b262 Initial revision claus parents: diff changeset	13	ByteCodeCompiler subclass:#Decompiler
7ad01559b262 Initial revision claus parents: diff changeset	14	instanceVariableNames:'extra hasLineNo bytes literals index '
7ad01559b262 Initial revision claus parents: diff changeset	15	classVariableNames:''
7ad01559b262 Initial revision claus parents: diff changeset	16	poolDictionaries:''
7ad01559b262 Initial revision claus parents: diff changeset	17	category:'System-Compiler'
7ad01559b262 Initial revision claus parents: diff changeset	18	!
7ad01559b262 Initial revision claus parents: diff changeset	19
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	20	!Decompiler class methodsFor:'documentation'!
0 7ad01559b262 Initial revision claus parents: diff changeset	21
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	22	copyright
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	23	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	24	COPYRIGHT (c) 1991 by Claus Gittinger
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	25	All Rights Reserved
0 7ad01559b262 Initial revision claus parents: diff changeset	26
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	27	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	28	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	29	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	30	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	31	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	32	hereby transferred.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	33	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	34	!
0 7ad01559b262 Initial revision claus parents: diff changeset	35
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	36	version
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	37	^ '$Header: /cvs/stx/stx/libcomp/Decompiler.st,v 1.4 1995-11-11 15:30:20 cg Exp $'
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	38	!
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	documentation
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	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	43
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	44	Decompiler decompile:(someClass compiledMethodAt:#someSelector)
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	45	"
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	46	! !
0 7ad01559b262 Initial revision claus parents: diff changeset	47
7ad01559b262 Initial revision claus parents: diff changeset	48	!Decompiler class methodsFor:'decompiling'!
7ad01559b262 Initial revision claus parents: diff changeset	49
7ad01559b262 Initial revision claus parents: diff changeset	50	decompile:aMethod
7ad01559b262 Initial revision claus parents: diff changeset	51	^ (self new) decompile:aMethod
7ad01559b262 Initial revision claus parents: diff changeset	52
7ad01559b262 Initial revision claus parents: diff changeset	53	"Decompiler decompile:(FileBrowser compiledMethodAt:#initialize)"
7ad01559b262 Initial revision claus parents: diff changeset	54	! !
7ad01559b262 Initial revision claus parents: diff changeset	55
7ad01559b262 Initial revision claus parents: diff changeset	56	!Decompiler methodsFor:'decompiling'!
7ad01559b262 Initial revision claus parents: diff changeset	57
7ad01559b262 Initial revision claus parents: diff changeset	58	showOffset:byte
7ad01559b262 Initial revision claus parents: diff changeset	59	\|offs\|
7ad01559b262 Initial revision claus parents: diff changeset	60
7ad01559b262 Initial revision claus parents: diff changeset	61	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	62	(byte > 127) ifTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	63	offs := byte - 256
0 7ad01559b262 Initial revision claus parents: diff changeset	64	] ifFalse:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	65	offs := byte
0 7ad01559b262 Initial revision claus parents: diff changeset	66	].
7ad01559b262 Initial revision claus parents: diff changeset	67	Transcript show:(offs printString).
7ad01559b262 Initial revision claus parents: diff changeset	68	Transcript show:' ('.
7ad01559b262 Initial revision claus parents: diff changeset	69	Transcript show:(index + offs) printString.
7ad01559b262 Initial revision claus parents: diff changeset	70	Transcript show:')'
7ad01559b262 Initial revision claus parents: diff changeset	71	!
7ad01559b262 Initial revision claus parents: diff changeset	72
7ad01559b262 Initial revision claus parents: diff changeset	73	showLongOffset:byte
7ad01559b262 Initial revision claus parents: diff changeset	74	\|offs\|
7ad01559b262 Initial revision claus parents: diff changeset	75
7ad01559b262 Initial revision claus parents: diff changeset	76	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	77	(byte > 127) ifTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	78	offs := byte - 256 - 128
0 7ad01559b262 Initial revision claus parents: diff changeset	79	] ifFalse:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	80	offs := byte + 128
0 7ad01559b262 Initial revision claus parents: diff changeset	81	].
7ad01559b262 Initial revision claus parents: diff changeset	82	Transcript show:offs printString.
7ad01559b262 Initial revision claus parents: diff changeset	83	Transcript show:' ('.
7ad01559b262 Initial revision claus parents: diff changeset	84	Transcript show:(index + offs) printString.
7ad01559b262 Initial revision claus parents: diff changeset	85	Transcript show:')'
7ad01559b262 Initial revision claus parents: diff changeset	86	!
7ad01559b262 Initial revision claus parents: diff changeset	87
7ad01559b262 Initial revision claus parents: diff changeset	88	showVeryLongOffset:byte
7ad01559b262 Initial revision claus parents: diff changeset	89	\|offs\|
7ad01559b262 Initial revision claus parents: diff changeset	90
7ad01559b262 Initial revision claus parents: diff changeset	91	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	92	(byte > 127) ifTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	93	offs := byte - 256 - 256
0 7ad01559b262 Initial revision claus parents: diff changeset	94	] ifFalse:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	95	offs := byte + 256
0 7ad01559b262 Initial revision claus parents: diff changeset	96	].
7ad01559b262 Initial revision claus parents: diff changeset	97	Transcript show:offs printString.
7ad01559b262 Initial revision claus parents: diff changeset	98	Transcript show:' ('.
7ad01559b262 Initial revision claus parents: diff changeset	99	Transcript show:(index + offs) printString.
7ad01559b262 Initial revision claus parents: diff changeset	100	Transcript show:')'
7ad01559b262 Initial revision claus parents: diff changeset	101	!
7ad01559b262 Initial revision claus parents: diff changeset	102
3 b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	103	showAbsOffset:byte
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	104	\|offs b2\|
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	105
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	106	index := index + 1.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	107	b2 := (bytes at:index).
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	108	offs := byte + (b2 bitShift:8).
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	109	index := index + 1.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	110	Transcript show:offs printString.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	111	Transcript show:' ('.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	112	Transcript show:offs printString.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	113	Transcript show:')'
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	114	!
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	115
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	116	showAbsOffsetLevel:byte
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	117	\|offs b2\|
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	118
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	119	index := index + 1.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	120	b2 := (bytes at:index).
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	121	offs := byte + (b2 bitShift:8).
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	122	index := index + 1.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	123	Transcript show:offs printString.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	124	Transcript show:' ('.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	125	Transcript show:offs printString.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	126	Transcript show:')'.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	127	self showNvarNargsAt:index.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	128	index := index + 2
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	129	!
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	130
0 7ad01559b262 Initial revision claus parents: diff changeset	131	showNvarNargsAt:index
7ad01559b262 Initial revision claus parents: diff changeset	132	Transcript show:' nv='.
7ad01559b262 Initial revision claus parents: diff changeset	133	Transcript show:(bytes at:index) printString.
7ad01559b262 Initial revision claus parents: diff changeset	134	Transcript show:' na='.
7ad01559b262 Initial revision claus parents: diff changeset	135	Transcript show:(bytes at:(index + 1)) printString
7ad01559b262 Initial revision claus parents: diff changeset	136	!
7ad01559b262 Initial revision claus parents: diff changeset	137
7ad01559b262 Initial revision claus parents: diff changeset	138	showLiteralAt:index
7ad01559b262 Initial revision claus parents: diff changeset	139	\|offs\|
7ad01559b262 Initial revision claus parents: diff changeset	140
7ad01559b262 Initial revision claus parents: diff changeset	141	offs := bytes at:index.
7ad01559b262 Initial revision claus parents: diff changeset	142	Transcript show:(literals at:offs) printString
7ad01559b262 Initial revision claus parents: diff changeset	143	!
7ad01559b262 Initial revision claus parents: diff changeset	144
7ad01559b262 Initial revision claus parents: diff changeset	145	showLiteral:byte
7ad01559b262 Initial revision claus parents: diff changeset	146	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	147	Transcript show:(literals at:byte) printString.
7ad01559b262 Initial revision claus parents: diff changeset	148	!
7ad01559b262 Initial revision claus parents: diff changeset	149
7ad01559b262 Initial revision claus parents: diff changeset	150	showLiteralSkip5:byte
7ad01559b262 Initial revision claus parents: diff changeset	151	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	152	Transcript show:(literals at:byte) printString.
7ad01559b262 Initial revision claus parents: diff changeset	153	index := index + 5
7ad01559b262 Initial revision claus parents: diff changeset	154	!
7ad01559b262 Initial revision claus parents: diff changeset	155
7ad01559b262 Initial revision claus parents: diff changeset	156	showOffsetLevel:byte
7ad01559b262 Initial revision claus parents: diff changeset	157	self showOffset:byte.
7ad01559b262 Initial revision claus parents: diff changeset	158	self showNvarNargsAt:index.
7ad01559b262 Initial revision claus parents: diff changeset	159	index := index + 2
7ad01559b262 Initial revision claus parents: diff changeset	160	!
7ad01559b262 Initial revision claus parents: diff changeset	161
7ad01559b262 Initial revision claus parents: diff changeset	162	showLongOffsetLevel:byte
7ad01559b262 Initial revision claus parents: diff changeset	163	self showLongOffset:byte.
7ad01559b262 Initial revision claus parents: diff changeset	164	self showNvarNargsAt:index.
7ad01559b262 Initial revision claus parents: diff changeset	165	index := index + 2
7ad01559b262 Initial revision claus parents: diff changeset	166	!
7ad01559b262 Initial revision claus parents: diff changeset	167
7ad01559b262 Initial revision claus parents: diff changeset	168	showVeryLongOffsetLevel:byte
7ad01559b262 Initial revision claus parents: diff changeset	169	self showVeryLongOffset:byte.
7ad01559b262 Initial revision claus parents: diff changeset	170	self showNvarNargsAt:index.
7ad01559b262 Initial revision claus parents: diff changeset	171	index := index + 2
7ad01559b262 Initial revision claus parents: diff changeset	172	!
7ad01559b262 Initial revision claus parents: diff changeset	173
7ad01559b262 Initial revision claus parents: diff changeset	174	showSendArgs:byte
7ad01559b262 Initial revision claus parents: diff changeset	175	Transcript show:byte printString.
7ad01559b262 Initial revision claus parents: diff changeset	176	Transcript show:' '.
7ad01559b262 Initial revision claus parents: diff changeset	177	index := index + 1.
3 b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	178	self showLiteralAt:index.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	179	index := index + 1
0 7ad01559b262 Initial revision claus parents: diff changeset	180	!
7ad01559b262 Initial revision claus parents: diff changeset	181
7ad01559b262 Initial revision claus parents: diff changeset	182	showSuperSendArgs:byte
7ad01559b262 Initial revision claus parents: diff changeset	183	Transcript show:byte printString.
7ad01559b262 Initial revision claus parents: diff changeset	184	Transcript show:' '.
7ad01559b262 Initial revision claus parents: diff changeset	185	index := index + 1.
7ad01559b262 Initial revision claus parents: diff changeset	186	self showLiteralAt:index.
3 b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	187	index := index + 1.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	188	self showLiteralAt:index.
0 7ad01559b262 Initial revision claus parents: diff changeset	189	index := index + 1
7ad01559b262 Initial revision claus parents: diff changeset	190	!
7ad01559b262 Initial revision claus parents: diff changeset	191
7ad01559b262 Initial revision claus parents: diff changeset	192	showLineNo:byte
7ad01559b262 Initial revision claus parents: diff changeset	193	Transcript show:' line:' , byte printString.
7ad01559b262 Initial revision claus parents: diff changeset	194	index := index + 1
7ad01559b262 Initial revision claus parents: diff changeset	195	!
7ad01559b262 Initial revision claus parents: diff changeset	196
7ad01559b262 Initial revision claus parents: diff changeset	197	showIndex:byte
7ad01559b262 Initial revision claus parents: diff changeset	198	Transcript show:byte printString.
7ad01559b262 Initial revision claus parents: diff changeset	199	index := index + 1
7ad01559b262 Initial revision claus parents: diff changeset	200	!
7ad01559b262 Initial revision claus parents: diff changeset	201
3 b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	202	showIndexLevel:byte
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	203	self showIndex:byte.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	204	self showNvarNargsAt:index.
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	205	index := index + 2
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	206	!
b63b8a6b71fb * empty log message * claus parents: 0 diff changeset	207
0 7ad01559b262 Initial revision claus parents: diff changeset	208	showNumber:byte
7ad01559b262 Initial revision claus parents: diff changeset	209	Transcript show:byte printString.
7ad01559b262 Initial revision claus parents: diff changeset	210	index := index + 1
7ad01559b262 Initial revision claus parents: diff changeset	211	!
7ad01559b262 Initial revision claus parents: diff changeset	212
7ad01559b262 Initial revision claus parents: diff changeset	213	showPC
7ad01559b262 Initial revision claus parents: diff changeset	214	Transcript show:(index printStringRadix:10 size:3 fill:(Character space)).
7ad01559b262 Initial revision claus parents: diff changeset	215	Transcript show:': '.
7ad01559b262 Initial revision claus parents: diff changeset	216	Transcript show:((bytes at:index) printStringRadix:16 size:2 fill:$0).
7ad01559b262 Initial revision claus parents: diff changeset	217	Transcript show:' '.
7ad01559b262 Initial revision claus parents: diff changeset	218	!
7ad01559b262 Initial revision claus parents: diff changeset	219
7ad01559b262 Initial revision claus parents: diff changeset	220	decompile:aMethod
7ad01559b262 Initial revision claus parents: diff changeset	221	\|nBytes offs byte sym sel\|
7ad01559b262 Initial revision claus parents: diff changeset	222
7ad01559b262 Initial revision claus parents: diff changeset	223	aMethod isNil ifTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	224	Transcript showCr:'nil method'.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	225	^ self
0 7ad01559b262 Initial revision claus parents: diff changeset	226	].
7ad01559b262 Initial revision claus parents: diff changeset	227
7ad01559b262 Initial revision claus parents: diff changeset	228	bytes := aMethod byteCode.
7ad01559b262 Initial revision claus parents: diff changeset	229	bytes isNil ifTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	230	Transcript showCr:'no bytecode'.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	231	^ self
0 7ad01559b262 Initial revision claus parents: diff changeset	232	].
7ad01559b262 Initial revision claus parents: diff changeset	233	literals := aMethod literals.
7ad01559b262 Initial revision claus parents: diff changeset	234	index := 1.
7ad01559b262 Initial revision claus parents: diff changeset	235	nBytes := bytes size.
7ad01559b262 Initial revision claus parents: diff changeset	236	[index <= nBytes] whileTrue:[
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	237	self showPC.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	238	sym := self symbolicCodeFor:(bytes at:index).
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	239	Transcript show:sym.
0 7ad01559b262 Initial revision claus parents: diff changeset	240	"
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	241	extra notNil ifTrue:[Transcript show:(extra printString)].
0 7ad01559b262 Initial revision claus parents: diff changeset	242	"
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	243	hasLineNo ifTrue:[
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	244	index := index + 1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	245	].
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	246	index := index + 1.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	247	extra notNil ifTrue:[
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	248	Transcript show:' '.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	249	byte := bytes at:index.
0 7ad01559b262 Initial revision claus parents: diff changeset	250
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	251	"compute argument showXXX selector from extra ..."
0 7ad01559b262 Initial revision claus parents: diff changeset	252
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	253	sel := 'show' , extra , ':'.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	254	sel at:5 put:(sel at:5) asUppercase.
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	255	self perform:sel asSymbol with:byte
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	256	].
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	257	Transcript showCr:''
0 7ad01559b262 Initial revision claus parents: diff changeset	258	]
7ad01559b262 Initial revision claus parents: diff changeset	259	!
7ad01559b262 Initial revision claus parents: diff changeset	260
7ad01559b262 Initial revision claus parents: diff changeset	261	symbolicCodeFor:aByte
7ad01559b262 Initial revision claus parents: diff changeset	262	\|syms extras lnos\|
7ad01559b262 Initial revision claus parents: diff changeset	263
7ad01559b262 Initial revision claus parents: diff changeset	264	syms := #( retTop " 0 "
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	265	retNil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	266	retTrue
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	267	retFalse
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	268	ret0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	269	retSelf " 5 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	270	blockRetTop
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	271	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	272	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	273	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	274	pushNil " 10 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	275	pushTrue
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	276	pushFalse
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	277	pushInt
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	278	pushLit
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	279	pushSelf " 15 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	280	pushNum
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	281	pushChar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	282	drop
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	283	send
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	284	superSend " 20 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	285	send0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	286	send1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	287	send2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	288	send3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	289	sendDrop " 25 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	290	sendDrop0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	291	sendDrop1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	292	sendDrop2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	293	sendDrop3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	294	pushMethodArg " 30 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	295	pushMethodVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	296	pushBlockArg
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	297	pushBlockVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	298	pushInstVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	299	pushClassVar " 35 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	300	pushGlobal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	301	storeMethodVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	302	storeBlockVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	303	storeInstVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	304	storeClassVar " 40 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	305	storeGlobal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	306	pushOuterBlockArg
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	307	pushOuter1BlockArg
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	308	pushOuter2BlockArg
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	309	equal " 45 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	310	notEqual
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	311	dup
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	312	equal0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	313	notEqual0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	314	falseJump " 50 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	315	trueJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	316	nilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	317	notNilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	318	jump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	319	makeBlock " 55 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	320	zeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	321	notZeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	322	eqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	323	notEqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	324	falseJump " 60 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	325	trueJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	326	nilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	327	notNilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	328	jump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	329	makeBlock " 65 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	330	zeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	331	notZeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	332	eqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	333	notEqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	334	falseJump " 70 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	335	trueJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	336	nilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	337	notNilJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	338	jump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	339	makeBlock " 75 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	340	zeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	341	notZeroJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	342	eqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	343	notEqJump
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	344	pushMethodVar1 " 80 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	345	pushMethodVar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	346	pushMethodVar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	347	pushMethodVar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	348	pushMethodVar5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	349	pushMethodVar6 " 85 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	350	pushMethodArg1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	351	pushMethodArg2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	352	pushMethodArg3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	353	pushMethodArg4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	354	pushInstVar1 " 90 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	355	pushInstVar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	356	pushInstVar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	357	pushInstVar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	358	pushInstVar5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	359	pushInstVar6 " 95 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	360	pushInstVar7
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	361	pushInstVar8
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	362	pushInstVar9
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	363	pushInstVar10
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	364	storeMethodVar1 " 100 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	365	storeMethodVar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	366	storeMethodVar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	367	storeMethodVar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	368	storeMethodVar5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	369	storeMethodVar6 " 105 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	370	sendY
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	371	sendX
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	372	sendWidth
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	373	sendHeight
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	374	storeInstVar1 " 110 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	375	storeInstVar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	376	storeInstVar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	377	storeInstVar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	378	storeInstVar5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	379	storeInstVar6 " 115 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	380	storeInstVar7
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	381	storeInstVar8
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	382	storeInstVar9
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	383	storeInstVar10
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	384	push0 " 120 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	385	push1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	386	pushMinus1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	387	sendPlus1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	388	sendMinus1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	389	incMethodVar " 125 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	390	decMethodVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	391	retNum
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	392	pushOuterBlockVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	393	storeOuterBlockVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	394	sendEQ " 130 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	395	sendPLUS
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	396	sendNE
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	397	sendMINUS
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	398	sendCLASS
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	399	sendAT " 135 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	400	sendATPUT
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	401	sendBitAnd
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	402	sendBitOr
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	403	push2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	404	pushBlockArg1 " 140 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	405	pushBlockArg2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	406	pushBlockArg3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	407	pushBlockArg4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	408	pushContext
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	409	sendGT " 145 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	410	sendGE
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	411	sendLT
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	412	sendLE
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	413	sendNEXT
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	414	sendPEEK " 150 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	415	sendVALUE
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	416	sendVALUE1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	417	sendSIZE
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	418	sendORIGIN
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	419	sendEXTENT " 155 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	420	make0Block
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	421	makeNILBlock
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	422	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	423	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	424	retMvar1 " 160 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	425	retMvar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	426	retMvar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	427	retMvar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	428	retMvar5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	429	retMvar6 " 165 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	430	retIvar1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	431	retIvar2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	432	retIvar3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	433	retIvar4
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	434	retIvar5 " 170 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	435	retIvar6
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	436	retIvar7
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	437	retIvar8
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	438	retMarg1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	439	retMarg2 " 175 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	440	pushClassInstVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	441	storeClassInstVar
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	442	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	443	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	444	sendSelf0 " 180 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	445	sendSelf1
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	446	sendSelf2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	447	sendSelf3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	448	sendSelfDrop0
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	449	sendSelfDrop1 " 185 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	450	sendSelfDrop2
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	451	sendSelfDrop3
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	452	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	453	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	454	falseJumpAbs " 190 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	455	trueJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	456	nilJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	457	notNilJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	458	jumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	459	makeBlockAbs " 195 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	460	zeroJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	461	notZeroJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	462	eqJumpAbs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	463	notEqJumpAbs " 199 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	464	).
0 7ad01559b262 Initial revision claus parents: diff changeset	465
7ad01559b262 Initial revision claus parents: diff changeset	466	lnos := #( false " 0 "
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	467	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	468	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	469	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	470	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	471	false " 5 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	472	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	473	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	474	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	475	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	476	false " 10 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	477	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	478	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	479	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	480	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	481	false " 15 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	482	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	483	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	484	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	485	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	486	true " 20 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	487	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	488	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	489	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	490	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	491	true " 25 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	492	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	493	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	494	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	495	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	496	false " 30 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	497	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	498	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	499	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	500	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	501	false " 35 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	502	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	503	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	504	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	505	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	506	false " 40 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	507	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	508	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	509	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	510	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	511	false " 45 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	512	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	513	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	514	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	515	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	516	false " 50 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	517	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	518	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	519	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	520	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	521	false " 55 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	522	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	523	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	524	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	525	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	526	false " 60 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	527	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	528	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	529	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	530	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	531	false " 65 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	532	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	533	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	534	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	535	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	536	false " 70 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	537	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	538	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	539	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	540	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	541	false " 75 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	542	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	543	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	544	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	545	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	546	false " 80 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	547	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	548	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	549	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	550	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	551	false " 85 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	552	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	553	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	554	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	555	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	556	false " 90 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	557	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	558	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	559	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	560	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	561	false " 95 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	562	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	563	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	564	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	565	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	566	false " 100 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	567	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	568	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	569	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	570	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	571	false " 105 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	572	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	573	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	574	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	575	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	576	false " 110 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	577	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	578	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	579	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	580	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	581	false " 115 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	582	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	583	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	584	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	585	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	586	false " 120 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	587	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	588	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	589	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	590	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	591	false " 125 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	592	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	593	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	594	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	595	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	596	false " 130 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	597	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	598	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	599	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	600	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	601	false " 135 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	602	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	603	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	604	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	605	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	606	false " 140 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	607	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	608	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	609	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	610	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	611	false " 145 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	612	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	613	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	614	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	615	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	616	false " 150 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	617	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	618	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	619	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	620	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	621	false " 155 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	622	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	623	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	624	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	625	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	626	false " 160 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	627	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	628	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	629	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	630	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	631	false " 165 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	632	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	633	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	634	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	635	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	636	false " 170 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	637	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	638	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	639	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	640	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	641	false " 175 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	642	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	643	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	644	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	645	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	646	true " 180 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	647	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	648	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	649	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	650	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	651	true " 185 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	652	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	653	true
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	654	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	655	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	656	false " 190 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	657	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	658	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	659	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	660	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	661	false " 195 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	662	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	663	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	664	false
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	665	false " 199 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	666	).
0 7ad01559b262 Initial revision claus parents: diff changeset	667
7ad01559b262 Initial revision claus parents: diff changeset	668	extras := #(nil " 0 "
135 aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	669	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	670	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	671	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	672	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	673	nil " 5 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	674	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	675	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	676	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	677	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	678	nil " 10 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	679	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	680	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	681	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	682	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	683	nil " 15 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	684	number
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	685	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	686	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	687	sendArgs
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	688	superSendArgs " 20 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	689	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	690	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	691	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	692	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	693	sendArgs " 25 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	694	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	695	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	696	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	697	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	698	index " 30 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	699	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	700	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	701	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	702	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	703	literalSkip5 " 35 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	704	literalSkip5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	705	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	706	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	707	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	708	literalSkip5 " 40 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	709	literalSkip5
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	710	indexLevel
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	711	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	712	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	713	nil " 45 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	714	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	715	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	716	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	717	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	718	offset " 50 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	719	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	720	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	721	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	722	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	723	offsetLevel " 55 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	724	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	725	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	726	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	727	offset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	728	longOffset " 60 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	729	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	730	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	731	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	732	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	733	longOffsetLevel " 65 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	734	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	735	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	736	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	737	longOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	738	veryLongOffset " 70 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	739	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	740	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	741	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	742	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	743	veryLongOffsetLevel " 75 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	744	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	745	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	746	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	747	veryLongOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	748	nil " 80 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	749	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	750	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	751	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	752	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	753	nil " 85 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	754	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	755	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	756	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	757	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	758	nil " 90 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	759	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	760	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	761	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	762	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	763	nil " 95 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	764	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	765	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	766	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	767	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	768	nil " 100 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	769	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	770	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	771	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	772	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	773	nil " 105 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	774	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	775	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	776	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	777	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	778	nil " 110 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	779	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	780	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	781	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	782	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	783	nil " 115 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	784	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	785	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	786	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	787	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	788	nil " 120 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	789	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	790	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	791	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	792	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	793	index " 125 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	794	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	795	number
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	796	indexLevel
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	797	indexLevel
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	798	nil " 130 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	799	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	800	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	801	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	802	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	803	nil " 135 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	804	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	805	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	806	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	807	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	808	nil " 140 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	809	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	810	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	811	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	812	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	813	nil " 145 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	814	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	815	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	816	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	817	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	818	nil " 150 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	819	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	820	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	821	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	822	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	823	nil " 155 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	824	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	825	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	826	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	827	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	828	nil " 160 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	829	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	830	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	831	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	832	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	833	nil " 165 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	834	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	835	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	836	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	837	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	838	nil " 170 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	839	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	840	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	841	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	842	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	843	nil " 175 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	844	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	845	index
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	846	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	847	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	848	literal " 180 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	849	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	850	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	851	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	852	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	853	literal " 185 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	854	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	855	literal
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	856	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	857	nil
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	858	absOffset " 190 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	859	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	860	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	861	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	862	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	863	absOffsetLevel
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	864	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	865	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	866	absOffset
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	867	absOffset " 199 "
aa4f7b8f121e uff - version methods changed to return stings Claus Gittinger <cg@exept.de> parents: 4 diff changeset	868	).
0 7ad01559b262 Initial revision claus parents: diff changeset	869
7ad01559b262 Initial revision claus parents: diff changeset	870	extra := extras at:(aByte + 1).
7ad01559b262 Initial revision claus parents: diff changeset	871	hasLineNo := lnos at:(aByte + 1).
7ad01559b262 Initial revision claus parents: diff changeset	872	^ syms at:(aByte + 1)
7ad01559b262 Initial revision claus parents: diff changeset	873	! !

author	Claus Gittinger <cg@exept.de>
	Sat, 09 Dec 1995 23:10:33 +0100
changeset 163	9a7dfd547e69
parent 135	aa4f7b8f121e
child 164	b511f22fea3b
permissions	-rw-r--r--