hg/stx-libjava: JavaDecompiler.st@13a10b73aa83 (annotated)

752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1	"
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	2	COPYRIGHT (c) 1996-2011 by Claus Gittinger
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	3
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	4	New code and modifications done at SWING Research Group [1]:
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	5
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	6	COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	7	SWING Research Group, Czech Technical University in Prague
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	8
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	9	This software is furnished under a license and may be used
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	10	only in accordance with the terms of that license and with the
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	11	inclusion of the above copyright notice. This software may not
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	12	be provided or otherwise made available to, or used by, any
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	13	other person. No title to or ownership of the software is
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	14	hereby transferred.
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	15
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	16	[1] Code written at SWING Research Group contains a signature
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	17	of one of the above copright owners. For exact set of such code,
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	18	see the differences between this version and version stx:libjava
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	19	as of 1.9.2010
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	20	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	21	"{ Package: 'stx:libjava' }"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	22
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	23	Object subclass:#JavaDecompiler
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	24	instanceVariableNames:'code pc javaMethod outStream classToCompileFor isStaticMethod
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	25	lastConstIndex lastConstant accessedInstvars modifiedInstvars
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	26	accessedStaticVars modifiedStaticVars sentMessages'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	27	classVariableNames:'DecoderTable'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	28	poolDictionaries:''
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	29	category:'Languages-Java-Support-Decompiling'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	30	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	31
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	32	!JavaDecompiler class methodsFor:'documentation'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	33
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	34	copyright
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	35	"
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	36	COPYRIGHT (c) 1996-2011 by Claus Gittinger
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	37
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	38	New code and modifications done at SWING Research Group [1]:
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	39
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	40	COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	41	SWING Research Group, Czech Technical University in Prague
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	42
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	43	This software is furnished under a license and may be used
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	44	only in accordance with the terms of that license and with the
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	45	inclusion of the above copyright notice. This software may not
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	46	be provided or otherwise made available to, or used by, any
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	47	other person. No title to or ownership of the software is
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	48	hereby transferred.
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	49
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	50	[1] Code written at SWING Research Group contains a signature
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	51	of one of the above copright owners. For exact set of such code,
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	52	see the differences between this version and version stx:libjava
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 1036 diff changeset	53	as of 1.9.2010
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 837 diff changeset	54
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	55	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	56	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	57
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	58	examples
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	59	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	60
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	61	[exBegin]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	62	\|m\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	63
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	64	m := JAVA::java::lang::Object compiledMethodAt:#'toString()Ljava/lang/String;'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	65	JavaDecompiler decompile:m to:Transcript.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	66	[exEnd]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	67
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	68
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	69
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	70	[exBegin]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	71	\|m\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	72
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	73	m := JAVA::java::lang::Object compiledMethodAt:#'toString()Ljava/lang/String;'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	74	JavaDecompiler decompile:m to:nil.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	75	[exEnd]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	76
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	77	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	78
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	79	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	80
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	81	!JavaDecompiler class methodsFor:'initialization'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	82
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	83	initialize
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	84	DecoderTable := #(
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	85	(nop) "/ 0
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	86	(aconst_null) "/ 1
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	87	(iconst_m1) "/ 2
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	88	(iconst_0) "/ 3
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	89	(iconst_1) "/ 4
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	90	(iconst_2) "/ 5
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	91	(iconst_3) "/ 6
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	92	(iconst_4) "/ 7
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	93	(iconst_5) "/ 8
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	94	(lconst_0) "/ 9
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	95
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	96	(lconst_1) "/ 10
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	97	(fconst_0) "/ 11
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	98	(fconst_1) "/ 12
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	99	(fconst_2) "/ 13
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	100	(dconst_0) "/ 14
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	101	(dconst_1) "/ 15
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	102	(bipush signedByte) "/ 16
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	103	(sipush signedShort) "/ 17
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	104	(ldc1 constIndexByte remember_ldc1) "/ 18
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	105	(ldc2 constIndexShort remember_ldc2) "/ 19
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	106
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	107	(ldc2w constIndexShort remember_ldc2w) "/ 20
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	108	(iload localIndexByte) "/ 21
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	109	(lload localIndexByte) "/ 22
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	110	(fload localIndexByte) "/ 23
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	111	(dload localIndexByte) "/ 24
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	112	(aload localIndexByte) "/ 25
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	113	(iload_0) "/ 26
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	114	(iload_1) "/ 27
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	115	(iload_2) "/ 28
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	116	(iload_3) "/ 29
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	117
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	118	(lload_0) "/ 30
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	119	(lload_1) "/ 31
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	120	(lload_2) "/ 32
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	121	(lload_3) "/ 33
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	122	(fload_0) "/ 34
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	123	(fload_1) "/ 35
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	124	(fload_2) "/ 36
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	125	(fload_3) "/ 37
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	126	(dload_0) "/ 38
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	127	(dload_1) "/ 39
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	128
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	129	(dload_2) "/ 40
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	130	(dload_3) "/ 41
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	131	(aload_0) "/ 42
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	132	(aload_1) "/ 43
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	133	(aload_2) "/ 44
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	134	(aload_3) "/ 45
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	135	(iaload) "/ 46
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	136	(laload) "/ 47
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	137	(faload) "/ 48
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	138	(daload) "/ 49
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	139
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	140	(aaload) "/ 50
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	141	(baload) "/ 51
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	142	(caload) "/ 52
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	143	(saload) "/ 53
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	144	(istore localIndexByte) "/ 54
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	145	(lstore localIndexByte) "/ 55
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	146	(fstore localIndexByte) "/ 56
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	147	(dstore localIndexByte) "/ 57
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	148	(astore localIndexByte) "/ 58
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	149	(istore_0) "/ 59
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	150
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	151	(istore_1) "/ 60
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	152	(istore_2) "/ 61
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	153	(istore_3) "/ 62
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	154	(lstore_0) "/ 63
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	155	(lstore_1) "/ 64
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	156	(lstore_2) "/ 65
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	157	(lstore_3) "/ 66
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	158	(fstore_0) "/ 67
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	159	(fstore_1) "/ 68
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	160	(fstore_2) "/ 69
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	161
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	162	(fstore_3) "/ 70
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	163	(dstore_0) "/ 71
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	164	(dstore_1) "/ 72
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	165	(dstore_2) "/ 73
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	166	(dstore_3) "/ 74
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	167	(astore_0) "/ 75
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	168	(astore_1) "/ 76
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	169	(astore_2) "/ 77
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	170	(astore_3) "/ 78
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	171	(iastore) "/ 79
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	172
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	173	(lastore) "/ 80
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	174	(fastore) "/ 81
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	175	(dastore) "/ 82
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	176	(aastore) "/ 83
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	177	(bastore) "/ 84
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	178	(castore) "/ 85
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	179	(sastore) "/ 86
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	180	(pop) "/ 87
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	181	(pop2) "/ 88
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	182	(dup) "/ 89
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	183
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	184	(dup_x1) "/ 90
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	185	(dup_x2) "/ 91
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	186	(dup2) "/ 92
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	187	(dup2_x1) "/ 93
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	188	(dup2_x2) "/ 94
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	189	(swap) "/ 95
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	190	(iadd) "/ 96
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	191	(ladd) "/ 97
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	192	(fadd) "/ 98
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	193	(dadd) "/ 99
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	194
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	195	(isub) "/ 100
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	196	(lsub) "/ 101
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	197	(fsub) "/ 102
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	198	(dsub) "/ 103
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	199	(imul) "/ 104
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	200	(lmul) "/ 105
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	201	(fmul) "/ 106
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	202	(dmul) "/ 107
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	203	(idiv) "/ 108
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	204	(ldiv) "/ 109
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	205
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	206	(fdiv) "/ 110
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	207	(ddiv) "/ 111
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	208	"/ (imod) "/ 112 "/ obsolete
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	209	(irem) "/ 112
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	210	"/ (lmod) "/ 113 "/ obsolete
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	211	(lrem) "/ 113
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	212	"/ (fmod) "/ 114 "/ obsolete
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	213	(frem) "/ 114
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	214	"/ (dmod) "/ 115 "/ obsolete
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	215	(drem) "/ 115
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	216	(ineg) "/ 116
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	217	(lneg) "/ 117
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	218	(fneg) "/ 118
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	219	(dneg) "/ 119
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	220
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	221	(ishl) "/ 120
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	222	(lshl) "/ 121
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	223	(ishr) "/ 122
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	224	(lshr) "/ 123
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	225	(iushr) "/ 124
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	226	(lushr) "/ 125
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	227	(iand) "/ 126
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	228	(land) "/ 127
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	229	(ior) "/ 128
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	230	(lor) "/ 129
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	231
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	232	(ixor) "/ 130
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	233	(lxor) "/ 131
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	234	(iinc localIndexByte signedByte) "/ 132
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	235	(i2l) "/ 133
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	236	(i2f) "/ 134
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	237	(i2d) "/ 135
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	238	(l2i) "/ 136
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	239	(l2f) "/ 137
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	240	(l2d) "/ 138
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	241	(f2i) "/ 139
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	242
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	243	(f2l) "/ 140
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	244	(f2d) "/ 141
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	245	(d2i) "/ 142
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	246	(d2l) "/ 143
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	247	(d2f) "/ 144
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	248	(int2byte) "/ 145
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	249	(int2char) "/ 146
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	250	(int2short) "/ 147
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	251	(lcmp) "/ 148
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	252	(fcmpl) "/ 149
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	253
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	254	(fcmpg) "/ 150
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	255	(dcmpl) "/ 151
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	256	(dcmpg) "/ 152
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	257	(ifeq signedBranchShort) "/ 153
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	258	(ifne signedBranchShort) "/ 154
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	259	(iflt signedBranchShort) "/ 155
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	260	(ifge signedBranchShort) "/ 156
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	261	(ifgt signedBranchShort) "/ 157
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	262	(ifle signedBranchShort) "/ 158
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	263	(if_icmpeq signedBranchShort) "/ 159
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	264
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	265	(if_icmpne signedBranchShort) "/ 160
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	266	(if_icmplt signedBranchShort) "/ 161
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	267	(if_icmpge signedBranchShort) "/ 162
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	268	(if_icmpgt signedBranchShort) "/ 163
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	269	(if_icmple signedBranchShort) "/ 164
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	270	(if_acmpeq signedBranchShort) "/ 165
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	271	(if_acmpne signedBranchShort) "/ 166
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	272	(goto signedBranchShort) "/ 167
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	273	(jsr signedBranchShort) "/ 168
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	274	(ret localIndexByte) "/ 169
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	275
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	276	(tableswitch tableSwitchBytes) "/ 170
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	277	(lookupswitch lookupSwitchBytes) "/ 171
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	278	(ireturn) "/ 172
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	279	(lreturn) "/ 173
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	280	(freturn) "/ 174
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	281	(dreturn) "/ 175
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	282	(areturn) "/ 176
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	283	(return) "/ 177
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	284	(getstatic constIndexShort remember_getstatic) "/ 178
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	285	(putstatic constIndexShort remember_putstatic) "/ 179
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	286
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	287	(getfield constIndexShort remember_getfield) "/ 180
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	288	(putfield constIndexShort remember_putfield) "/ 181
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	289	(invokevirtual constIndexShort remember_invokevirtual) "/ 182
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	290	(invokenonvirtual constIndexShort remember_invokenonvirtual) "/ 183
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	291	(invokestatic constIndexShort remember_invokestatic) "/ 184
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	292	(invokeinterface constIndexShort nargsByte reservedByte remember_invokeinterface) "/ 185
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	293	(newfromname) "/ 186
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	294	(new constIndexShort remember_new) "/ 187
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	295	(newarray arrayTypeByte) "/ 188
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	296	(anewarray constIndexShort) "/ 189
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	297
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	298	(arraylength) "/ 190
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	299	(athrow remember_athrow) "/ 191
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	300	(checkcast constIndexShort) "/ 192
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	301	(instanceof constIndexShort) "/ 193
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	302	(monitorenter) "/ 194
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	303	(monitorexit) "/ 195
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	304	"/ (verifystack) "/ 196 obsolete (Alpha release)
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	305	(wide) "/ 196
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	306	(multianewarray constIndexShort dimensionsByte) "/ 197
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	307
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	308	(ifnull signedBranchShort) "/ 198
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	309	(ifnonnull signedBranchShort) "/ 199
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	310
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	311	(#'goto_w' signedBranchLong) "/ 200
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	312	(#'jsr_w' signedBranchShort) "/ 201
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	313
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	314	(breakpoint) "/ 202
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	315
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	316	nil "/ 203
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	317	nil "/ 204
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	318	nil "/ 205
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	319	nil "/ 206
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	320	nil "/ 207
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	321	nil "/ 208
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	322	(#'ret_w' signedBranchShort) "/ 209
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	323
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	324	nil "/ 210
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	325	nil "/ 211
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	326	nil "/ 212
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	327	nil "/ 213
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	328	nil "/ 214
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	329	nil "/ 215
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	330	nil "/ 216
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	331	nil "/ 217
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	332	nil "/ 218
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	333	nil "/ 219
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	334
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	335	nil "/ 220
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	336	nil "/ 221
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	337	nil "/ 222
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	338	nil "/ 223
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	339	nil "/ 224
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	340	nil "/ 225
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	341	nil "/ 226
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	342	nil "/ 227
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	343	nil "/ 228
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	344	nil "/ 229
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	345
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	346	nil "/ 230
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	347	nil "/ 231
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	348	nil "/ 232
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	349	nil "/ 233
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	350	nil "/ 234
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	351	nil "/ 235
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	352	nil "/ 236
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	353	nil "/ 237
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	354	nil "/ 238
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	355	nil "/ 239
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	356
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	357	nil "/ 240
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	358	nil "/ 241
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	359	nil "/ 242
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	360	nil "/ 243
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	361	nil "/ 244
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	362	nil "/ 245
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	363	nil "/ 246
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	364	nil "/ 247
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	365	nil "/ 248
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	366	nil "/ 249
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	367
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	368	nil "/ 250
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	369	nil "/ 251
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	370	nil "/ 252
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	371	nil "/ 253
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	372	nil "/ 254
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	373	(invokenonvirtual_d constIndexShort) "/ 255 special - dummy invokenonvirtual
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	374	)
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	375
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	376	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	377	JavaDecompiler initialize
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	378	"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	379
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	380	"Modified: / 16.11.1998 / 15:55:49 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	381	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	382
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	383	!JavaDecompiler class methodsFor:'accessing'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	384
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	385	instructionTable
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	386	^ DecoderTable
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	387	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	388
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	389	!JavaDecompiler class methodsFor:'class definition generation'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	390
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	391	definitionOf:aJavaClass on:s
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	392	\|pckgName needCR fields staticFields superClass
1281 b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	393	interfaces staticMethods nonStaticMethods
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	394	accessAttributeStyle codeStyle classNameStyle methodNameStyle\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	395
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	396	accessAttributeStyle := Java prettyPrintStyle at:#accessAttribute.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	397	codeStyle := Java prettyPrintStyle at:#code.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	398	classNameStyle := Java prettyPrintStyle at:#className.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	399	methodNameStyle := Java prettyPrintStyle at:#className.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	400
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	401	pckgName := aJavaClass package.
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	402	pckgName ~= 'java' ifTrue:[
0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	403	s nextPutAll:'package ' , ((pckgName copyFrom: 6) copyReplaceAll:$/ with:$.).
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	404	s nextPutAll:';'; cr; cr.
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	405
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	406	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	407
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	408	needCR := false.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	409	s emphasis:accessAttributeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	410
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	411	aJavaClass isPublic ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	412	s nextPutAll:'public '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	413	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	414	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	415	aJavaClass isAbstract ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	416	s nextPutAll:'abstract '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	417	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	418	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	419	aJavaClass isFinal ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	420	s nextPutAll:'final '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	421	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	422	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	423	s emphasis:codeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	424
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	425	needCR ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	426	s cr
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	427	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	428	aJavaClass isInterface ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	429	s nextPutAll:'interface '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	430	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	431	s nextPutAll:'class '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	432	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	433	s emphasis:classNameStyle;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	434	nextPutAll:aJavaClass lastName;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	435	emphasis:codeStyle;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	436	space.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	437	superClass := aJavaClass superclass.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	438
1036 4ff03464c3b3 refactored registry.. hlopkmar parents: 1033 diff changeset	439	(superClass ~~ (JavaVM classNamed:'java/lang/Object')
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	440	and:[superClass isJavaClass]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	441	s nextPutAll:'extends '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	442	s emphasis:classNameStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	443	(superClass package ~= 'java/lang'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	444	and:[superClass package ~= pckgName]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	445	s nextPutAll:(superClass displayString).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	446	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	447	s nextPutAll:(superClass lastName).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	448	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	449	s emphasis:codeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	450	s space.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	451	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	452
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	453	(interfaces := aJavaClass interfaces) size > 0 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	454	(aJavaClass isInterface
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	455	and:[interfaces size == 1]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	456	s nextPutAll:'extends '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	457	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	458	s nextPutAll:'implements '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	459	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	460	interfaces keysAndValuesDo:[:nr :if \|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	461	\|nameString\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	462
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	463	nr ~~ 1 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	464	s nextPutAll:', '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	465	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	466	s emphasis:classNameStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	467	(if package ~= 'java/lang'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	468	and:[if package ~= pckgName]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	469	if isJavaClass ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	470	"/ ought to be an unresolved class ...
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	471	nameString := if fullName copyReplaceAll:$/ with:$.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	472	] ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	473	nameString := if displayString
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	474	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	475	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	476	nameString := if lastName
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	477	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	478	s nextPutAll:nameString.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	479	s emphasis:codeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	480	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	481	s space.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	482	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	483
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	484	s nextPutAll:'{'; cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	485
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	486	needCR := false.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	487	staticFields := aJavaClass staticFields.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	488	staticFields size > 0 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	489	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	490
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	491	staticFields do:[:aField \|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	492	\|type v\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	493
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	494	s nextPutAll:' '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	495	s emphasis:accessAttributeStyle.
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	496	aField isSynthetic ifTrue:[
0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	497	s nextPutAll: '/SYNTHETIC/ '.
0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	498	].
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	499	aField isPublic ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	500	s nextPutAll:'public '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	501	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	502	aField isPrivate ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	503	s nextPutAll:'private '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	504	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	505	aField isProtected ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	506	s nextPutAll:'protected '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	507	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	508	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	509	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	510	s nextPutAll:'static '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	511	aField isFinal ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	512	s nextPutAll:'final '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	513	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	514	aField isVolatile ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	515	s nextPutAll:'volatile '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	516	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	517	s emphasis:codeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	518
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	519	(((type := aField type) startsWith:pckgName)
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	520	or:[type startsWith:(pckgName copyReplaceAll:$/ with:$.)]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	521	type := type copyFrom:(pckgName size + 1 + 1).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	522	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	523	(type startsWith:'java.lang.') ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	524	type := type copyFrom:(11).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	525	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	526	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	527	type := type copy replaceAll:$/ with:$..
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	528	s nextPutAll:type; space;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	529	nextPutAll:aField name.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	530
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	531	(v := aField constantValue) notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	532	s nextPutAll:' = '; nextPutAll:v displayString.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	533	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	534
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	535	s nextPutAll:';'; cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	536	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	537	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	538	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	539
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	540
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	541	fields := aJavaClass fields.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	542	fields size > 0 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	543	needCR ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	544	s cr
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	545	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	546	needCR := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	547
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	548	fields do:[:aField \|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	549	\|type v\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	550
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	551	s nextPutAll:' '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	552	s emphasis:accessAttributeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	553	aField isPublic ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	554	s nextPutAll:'public '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	555	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	556	aField isPrivate ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	557	s nextPutAll:'private '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	558	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	559	aField isProtected ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	560	s nextPutAll:'protected '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	561	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	562	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	563	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	564	aField isFinal ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	565	s nextPutAll:'final '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	566	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	567	aField isTransient ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	568	s nextPutAll:'transient '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	569	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	570	aField isVolatile ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	571	s nextPutAll:'volatile '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	572	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	573	s emphasis:codeStyle.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	574
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	575	(((type := aField type) startsWith:pckgName)
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	576	or:[type startsWith:(pckgName copyReplaceAll:$/ with:$.)]) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	577	type := type copyFrom:(pckgName size + 1 + 1).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	578	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	579	type := type copy replaceAll:$/ with:$..
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	580	s nextPutAll:type; space;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	581	nextPutAll:aField name.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	582
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	583	(v := aField constantValue) notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	584	s nextPutAll:' = '; nextPutAll:v displayString.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	585	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	586	s nextPutAll:';'; cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	587	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	588	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	589
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	590	aJavaClass methodDictionary size > 0 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	591	needCR ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	592	s cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	593	needCR := false.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	594	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	595
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	596	staticMethods := OrderedCollection new.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	597	nonStaticMethods := OrderedCollection new.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	598	"/
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	599	"/ static methods first ...
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	600	"/
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	601	aJavaClass methodDictionary do:[:aMethod \|
1281 b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	602	aMethod isJavaMethod ifTrue:[
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	603	\|m\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	604
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	605	m := aMethod.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	606	m isWrapped ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	607	m := m originalMethod
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	608	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	609	m isStatic ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	610	staticMethods add:m.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	611	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	612	nonStaticMethods add:m.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	613	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	614	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	615
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	616	staticMethods notEmpty ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	617	staticMethods sort:[:a :b \| a name < b name].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	618	staticMethods do:[:aMethod \|
1281 b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	619	"JV@2011-12-14: method dictionary may contain non-Java methods
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	620	(proxies, for instance)"
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	621	aMethod isJavaMethod ifTrue:[
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	622	self methodDefinitionOf:aMethod inPackage:pckgName on:s.
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	623	]
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	624	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	625	s cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	626	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	627
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	628	"/
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	629	"/ instance methods ...
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	630	"/
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	631	nonStaticMethods notEmpty ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	632	nonStaticMethods sort:[:a :b \| a name < b name].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	633	nonStaticMethods do:[:aMethod \|
1281 b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	634	"JV@2011-12-14: method dictionary may contain non-Java methods
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	635	(proxies, for instance)"
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	636	aMethod isJavaMethod ifTrue:[
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	637	self methodDefinitionOf:aMethod inPackage:pckgName on:s.
b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	638	]
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	639	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	640	].
1281 b46adbe75503 Some cleanup vranyj1 parents: 1155 diff changeset	641	]
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	642	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	643
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	644	s nextPutAll:'}'; cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	645
1036 4ff03464c3b3 refactored registry.. hlopkmar parents: 1033 diff changeset	646	"Created: / 22-03-1997 / 14:29:37 / cg"
4ff03464c3b3 refactored registry.. hlopkmar parents: 1033 diff changeset	647	"Modified: / 05-12-1998 / 15:58:37 / cg"
4ff03464c3b3 refactored registry.. hlopkmar parents: 1033 diff changeset	648	"Modified: / 21-10-2011 / 13:40:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	649	"Modified: / 31-03-2012 / 00:36:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	650	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	651
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	652	methodDefinitionOf: m inPackage: pckgName on: s
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	653	\| aMethod nm specComponents accessAttributeStyle codeStyle methodNameStyle \|
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	654
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	655	aMethod := m.
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	656	m isWrapped ifTrue: [
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	657	aMethod := m originalMethod
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	658	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	659	accessAttributeStyle := Java prettyPrintStyle at: #accessAttribute.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	660	codeStyle := Java prettyPrintStyle at: #code.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	661	methodNameStyle := Java prettyPrintStyle at: #methodName.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	662	s nextPutAll: ' '.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	663	s emphasis: accessAttributeStyle.
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	664	aMethod isSynthetic ifTrue:[
0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	665	s nextPutAll: '/SYNTHETIC/ '.
0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	666	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	667	aMethod isPublic ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	668	s nextPutAll: 'public '.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	669	] ifFalse: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	670	aMethod isProtected ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	671	s nextPutAll: 'protected '.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	672	] ifFalse: [ s nextPutAll: 'private '. ]
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	673	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	674	aMethod isFinal ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	675	s nextPutAll: 'final '.
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	676	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	677	aMethod isStatic ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	678	s nextPutAll: 'static '.
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	679	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	680	aMethod isNative ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	681	s nextPutAll: 'native '.
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	682	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	683	aMethod isSynchronized ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	684	s nextPutAll: 'synchronized '.
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	685	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	686	s emphasis: codeStyle.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	687	(nm := aMethod name) = '<init>' ifTrue: [
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	688	nm := aMethod javaClass lastName.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	689	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	690	specComponents := JavaMethod
915 cf0d328465c2 vranyj1 parents: 877 diff changeset	691	specComponentsWithArgsFromSignature: (aMethod instVarNamed:#descriptor)
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	692	withName: nm
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	693	in: (aMethod javaClass package).
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	694	s nextPutAll: (specComponents at: 1).
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	695	s space.
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	696	s emphasis: methodNameStyle.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	697	s nextPutAll: (specComponents at: 2).
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	698	s emphasis: codeStyle.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	699	s nextPutAll: ' ('.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	700	s nextPutAll: (specComponents at: 3).
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	701	s nextPutAll: ')'.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	702	aMethod exceptionTable size > 0 ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	703	s nextPutAll: ' throws '.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	704	aMethod exceptionTable
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	705	keysAndValuesDo: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	706	:index :aClassRef \|
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	707	\| nm \|
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	708
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	709	nm := aClassRef name.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	710	(nm startsWith: pckgName) ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	711	nm := nm copyFrom: pckgName size + 2
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	712	] ifFalse: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	713	(nm startsWith: 'java/lang') ifTrue: [
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	714	nm := nm copyFrom: 'java/lang' size + 2.
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	715	].
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	716	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	717	index ~~ 1 ifTrue: [ s nextPutAll: ', ' ].
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	718	s nextPutAll: (nm copyReplaceAll: $/ with: $.)
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	719	]
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	720	].
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	721	s
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	722	nextPutAll: ';';
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	723	cr.
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	724
837 8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	725	"Created: / 01-08-1997 / 12:24:11 / cg"
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	726	"Modified: / 14-11-1998 / 00:03:09 / cg"
8f42226d82c0 slightly refactored exceptionTable methods and their callers.. no typechanging side effects hlopkmar parents: 752 diff changeset	727	"Modified: / 04-06-2011 / 17:18:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
1441 0faa0f8eda0c Minor improvements in reloading vranyj1 parents: 1281 diff changeset	728	"Modified (format): / 30-03-2012 / 19:52:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	729	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	730
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	731	!JavaDecompiler class methodsFor:'decompiling'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	732
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	733	decompile:aJavaMethod
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	734	self decompile:aJavaMethod to:Transcript
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	735	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	736
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	737	decompile:aJavaMethod to:aStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	738	self new decompile:aJavaMethod to:aStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	739	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	740
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	741	!JavaDecompiler methodsFor:'decompiling'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	742
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	743	decompile:aJavaMethod to:aStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	744	\|who endPC\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	745
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	746	outStream := aStream.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	747
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	748	isStaticMethod := aJavaMethod isStatic.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	749
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	750	who := aJavaMethod who.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	751	who notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	752	classToCompileFor := who methodClass.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	753	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	754	outStream cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	755	"/ outStream showCR:'decompiling ' , classToCompileFor name , '>>' , (who methodSelector) , ':'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	756	outStream showCR:'decompiling ' , aJavaMethod displayString , ':'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	757	isStaticMethod ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	758	outStream show:'static method'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	759	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	760	outStream cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	761	outStream cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	762	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	763	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	764
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	765	javaMethod := aJavaMethod.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	766	code := aJavaMethod javaByteCode.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	767	endPC := code size.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	768	endPC == 0 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	769	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	770	javaMethod isNative ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	771	outStream nextPutAll:'// native method'; cr
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	772	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	773	outStream nextPutAll:'{} // no bytecode'; cr
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	774	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	775	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	776	^ self
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	777	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	778
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	779	self enumerateInstructions.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	780
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	781	"Modified: / 9.11.1999 / 15:33:20 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	782	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	783
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	784	enumerateInstructions
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	785	\|who endPC insn spec op wide\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	786
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	787	wide := false.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	788	pc := 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	789	endPC := code size.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	790	[pc <= endPC] whileTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	791	insn := code at:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	792	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	793
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	794	spec := DecoderTable at:(insn + 1).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	795	spec isNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	796	op := ' invalid opcode: ', insn printString, ' '
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	797	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	798	op := spec at:1
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	799	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	800
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	801	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	802	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	803	show:((pc - 1 - 1) printStringPaddedTo:4);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	804	show:' '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	805	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	806	show:(wide ifTrue:[op , '(w)'] ifFalse:[op]).
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	807	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	808	show:' '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	809	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	810
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	811	op == #wide ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	812	wide := true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	813	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	814	self instructionHookPC:(pc-1) op:op spec:spec.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	815
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	816	spec notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	817	spec from:2 to:spec size do:[:what \|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	818	wide ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	819	self perform:(what , '_wide') asSymbol.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	820	] ifFalse:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	821	self perform:what
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	822	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	823	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	824	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	825	wide := false.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	826	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	827
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	828	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	829	outStream cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	830	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	831	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	832
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	833	"Created: / 9.11.1999 / 15:32:49 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	834	"Modified: / 9.11.1999 / 15:36:22 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	835	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	836
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	837	instructionHookPC:pc op:op spec:spec
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	838
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	839	"Created: / 9.11.1999 / 15:35:19 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	840	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	841
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	842	!JavaDecompiler methodsFor:'operand decoding'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	843
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	844	arrayTypeByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	845	\|hi low index type\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	846
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	847	index := code at:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	848	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	849
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	850	type := #('T_ARRAY' 'invalid2' 'invalid3' 'T_BOOLEAN'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	851	'T_CHAR' 'T_FLOAT' 'T_DOUBLE' 'T_BYTE'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	852	'T_SHORT' 'T_INT' 'T_LONG' ) at:index ifAbsent:['invalid' , index printString].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	853
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	854	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	855	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	856	show:index;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	857	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	858	show:type;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	859	show:']'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	860	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	861
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	862	"Created: / 16.11.1998 / 15:41:47 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	863	"Modified: / 16.11.1998 / 15:43:27 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	864	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	865
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	866	constIndexByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	867	lastConstIndex := code at:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	868	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	869
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	870	lastConstant := javaMethod constantPool at:lastConstIndex ifAbsent:nil.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	871
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	872	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	873	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	874	show:lastConstIndex;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	875	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	876	show:(lastConstant ? '??') displayString;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	877	show:'] '
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	878	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	879
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	880	"Created: / 16.11.1998 / 15:42:56 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	881	"Modified: / 16.11.1998 / 15:58:52 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	882	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	883
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	884	constIndexShort
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	885	\|s\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	886
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	887	lastConstIndex := code wordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	888	pc := pc + 2.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	889
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	890	lastConstant := javaMethod constantPool at:lastConstIndex ifAbsent:nil.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	891	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	892	s := (lastConstant ? '??') displayString.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	893	s isString ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	894	s bitsPerCharacter > 8 ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	895	s := '...a 2-byte string...'
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	896	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	897	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	898	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	899	show:lastConstIndex;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	900	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	901	show:s;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	902	show:'] '
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	903	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	904
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	905	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	906	"Modified: / 16.11.1998 / 15:59:23 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	907	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	908
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	909	dimensionsByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	910	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	911	outStream show:' dims= '.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	912	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	913	self unsignedByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	914
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	915	"Modified: / 9.11.1999 / 15:46:06 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	916	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	917
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	918	localIndexByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	919	\|index\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	920
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	921	index := code at:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	922	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	923
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	924	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	925	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	926	show:index;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	927	show:' '
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	928	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	929
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	930	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	931	"Modified: / 16.11.1998 / 15:43:55 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	932	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	933
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	934	localIndexByte_wide
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	935	\|index\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	936
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	937	index := code wordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	938	pc := pc + 2.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	939
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	940	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	941	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	942	show:index;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	943	show:' '
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	944	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	945
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	946	"Created: / 4.8.1997 / 19:02:09 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	947	"Modified: / 16.11.1998 / 15:44:02 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	948	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	949
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	950	lookupSwitchBytes
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	951	\|defaultOffset delta nPairs match pc0\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	952
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	953	pc0 := pc-1. "/ i.e. the pc of the tableSwitch op
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	954
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	955	[(pc-1) \\ 4 ~~ 0] whileTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	956	pc := pc + 1
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	957	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	958
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	959	defaultOffset := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	960	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	961	nPairs := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	962	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	963
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	964	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	965	outStream show:'n='; show:nPairs; cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	966	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	967
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	968	nPairs timesRepeat:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	969	match := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	970	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	971	delta := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	972	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	973	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	974	outStream show:' ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	975	show:match;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	976	show:' -> ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	977	show:delta;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	978	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	979	show:(pc0 - 1 + delta);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	980	show:']';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	981	cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	982	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	983	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	984
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	985	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	986	outStream show:' ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	987	show:'default';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	988	show:' -> ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	989	show:defaultOffset;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	990	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	991	show:(pc0 - 1 + defaultOffset);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	992	show:']'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	993	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	994
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	995	"Modified: / 9.11.1999 / 15:45:50 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	996	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	997
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	998	nargsByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	999	\|byte constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1000
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1001	byte := code byteAt:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1002	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1003
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1004	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1005	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1006	show:byte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1007	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1008
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1009	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1010	"Modified: / 16.11.1998 / 15:44:34 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1011	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1012
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1013	reservedByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1014	\|byte constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1015
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1016	byte := code byteAt:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1017	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1018
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1019	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1020	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1021	show:byte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1022	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1023
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1024	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1025	"Modified: / 16.11.1998 / 15:44:42 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1026	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1027
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1028	signedBranchShort
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1029	\|index constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1030
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1031	index := code signedWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1032
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1033	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1034	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1035	show:index;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1036	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1037	show:(pc - 1 + index - 1);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1038	show:']'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1039	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1040
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1041	pc := pc + 2.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1042
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1043	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1044	"Modified: / 16.11.1998 / 15:44:51 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1045	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1046
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1047	signedByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1048	\|byte constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1049
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1050	byte := code signedByteAt:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1051	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1052
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1053	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1054	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1055	show:byte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1056	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1057
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1058	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1059	"Modified: / 16.11.1998 / 15:44:58 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1060	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1061
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1062	signedByte_wide
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1063	self signedShort
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1064
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1065	"Created: / 13.1.1998 / 23:56:36 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1066	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1067
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1068	signedShort
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1069	\|word constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1070
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1071	word := code signedWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1072	pc := pc + 2.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1073
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1074	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1075	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1076	show:word
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1077	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1078
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1079	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1080	"Modified: / 16.11.1998 / 15:45:06 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1081	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1082
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1083	tableSwitchBytes
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1084	\|defaultOffset delta low high pc0\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1085
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1086	pc0 := pc-1. "/ i.e. the pc of the tableSwitch op
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1087
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1088	[(pc-1) \\ 4 ~~ 0] whileTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1089	pc := pc + 1
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1090	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1091
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1092	defaultOffset := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1093	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1094	low := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1095	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1096	high := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1097	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1098
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1099	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1100	outStream cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1101	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1102
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1103	low to:high do:[:switchValue \|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1104	delta := code signedDoubleWordAt:pc MSB:true.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1105	pc := pc + 4.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1106	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1107	outStream show:' ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1108	show:switchValue;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1109	show:' -> ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1110	show:delta;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1111	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1112	show:(pc0 - 1 + delta);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1113	show:']';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1114	cr.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1115	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1116	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1117
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1118	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1119	outStream show:' ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1120	show:'default';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1121	show:' -> ';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1122	show:defaultOffset;
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1123	show:' [';
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1124	show:(pc0 - 1 + defaultOffset);
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1125	show:']'.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1126	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1127
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1128	"Modified: / 9.11.1999 / 15:44:36 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1129	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1130
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1131	unsignedByte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1132	\|byte constants\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1133
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1134	byte := code byteAt:pc.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1135	pc := pc + 1.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1136
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1137	outStream notNil ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1138	outStream
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1139	show:byte
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1140	]
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1141
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1142	"Created: / 16.4.1996 / 15:00:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1143	"Modified: / 16.11.1998 / 15:45:33 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1144	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1145
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1146	!JavaDecompiler methodsFor:'private'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1147
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1148	popType:type
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1149	(type == #long) ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1150	^ self popLong
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1151	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1152	type == #double ifTrue:[
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1153	^ self popDouble
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1154	].
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1155	^ self popStack
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1156
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1157	"Created: 16.8.1997 / 03:14:11 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1158	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1159
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1160	!JavaDecompiler methodsFor:'statistics'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1161
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1162	remember_athrow
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1163
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1164	"Created: / 16.11.1998 / 19:37:32 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1165	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1166
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1167	remember_getfield
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1168	\|fieldRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1169
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1170	fieldRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1171	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1172
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1173	"Created: / 16.11.1998 / 16:07:58 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1174	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1175
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1176	remember_getstatic
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1177	\|fieldRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1178
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1179	fieldRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1180	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1181
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1182	"Created: / 16.11.1998 / 16:08:06 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1183	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1184
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1185	remember_invokeinterface
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1186	\|mthdRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1187
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1188	mthdRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1189	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1190
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1191	"Created: / 16.11.1998 / 16:07:29 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1192	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1193
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1194	remember_invokenonvirtual
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1195	\|mthdRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1196
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1197	mthdRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1198	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1199
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1200	"Created: / 16.11.1998 / 16:06:49 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1201	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1202
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1203	remember_invokestatic
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1204	\|mthdRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1205
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1206	mthdRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1207	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1208
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1209	"Created: / 16.11.1998 / 16:06:40 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1210	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1211
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1212	remember_invokevirtual
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1213	\|mthdRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1214
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1215	mthdRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1216	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1217
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1218	"Created: / 16.11.1998 / 16:06:32 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1219	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1220
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1221	remember_ldc1
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1222	\|what\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1223
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1224	what := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1225	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1226
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1227	"Created: / 16.11.1998 / 16:07:12 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1228	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1229
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1230	remember_ldc2
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1231	\|what\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1232
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1233	what := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1234	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1235
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1236	"Created: / 16.11.1998 / 16:07:19 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1237	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1238
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1239	remember_ldc2w
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1240	\|what\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1241
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1242	what := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1243	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1244
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1245	"Created: / 16.11.1998 / 16:07:20 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1246	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1247
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1248	remember_new
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1249	\|class\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1250
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1251	class := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1252
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1253	"Created: / 16.11.1998 / 15:59:43 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1254	"Modified: / 16.11.1998 / 16:12:27 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1255	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1256
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1257	remember_putfield
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1258	\|fieldRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1259
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1260	fieldRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1261	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1262
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1263	"Created: / 16.11.1998 / 16:08:00 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1264	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1265
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1266	remember_putstatic
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1267	\|fieldRef\|
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1268
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1269	fieldRef := lastConstant.
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1270	"/ ....
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1271
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1272	"Created: / 16.11.1998 / 16:08:04 / cg"
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1273	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1274
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1275	!JavaDecompiler class methodsFor:'documentation'!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1276
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1277	version
1864 60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1278	^ '$Header$'
60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1279	!
60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1280
60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1281	version_HG
60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1282
60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1283	^ '$Changeset: <not expanded> $'
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1284	!
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1285
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1286	version_SVN
1864 60a8dc26c8c6 Updated from HG vranyj1 parents: 1818 diff changeset	1287	^ '�Id�'
923 b922537eea2a Merged with CVS version vranyj1 parents: 915 diff changeset	1288
752 ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1289	! !
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1290
ff7bc6428c9c branch jk_new_structure resurrected vranyj1 parents: diff changeset	1291	JavaDecompiler initialize!

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Fri, 25 Jan 2013 00:15:51 +0000
branch	refactoring-classpath
changeset 2000	13a10b73aa83
parent 1864	60a8dc26c8c6
child 2069	75d40b7b986f
permissions	-rw-r--r--