hg/stx-libjava: JavaFieldRefTests.st@b36e52129040 (annotated)

877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	1	"
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	2	COPYRIGHT (c) 1996-2011 by Claus Gittinger
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 877 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: 877 diff changeset	5
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	6	COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	7	SWING Research Group, Czech Technical University in Prague
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	8
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	9	This software is furnished under a license and may be used
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	10	only in accordance with the terms of that license and with the
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	11	inclusion of the above copyright notice. This software may not
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	12	be provided or otherwise made available to, or used by, any
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	13	other person. No title to or ownership of the software is
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	14	hereby transferred.
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 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: 877 diff changeset	19	as of 1.9.2010
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	20	"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	21	"{ Package: 'stx:libjava' }"
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	22
1515 f4ebf5cf3f89 - JavaClassReaderTests vranyj1 parents: 1509 diff changeset	23	JavaRefsAndConstantPoolTestCase subclass:#JavaFieldRefTests
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	24	instanceVariableNames:''
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	25	classVariableNames:''
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	26	poolDictionaries:''
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	27	category:'Languages-Java-Tests-RuntimeConstantPool'
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	28	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	29
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	30	!JavaFieldRefTests class methodsFor:'documentation'!
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	31
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	32	copyright
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	33	"
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	34	COPYRIGHT (c) 1996-2011 by Claus Gittinger
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 877 diff changeset	35
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	36	New code and modifications done at SWING Research Group [1]:
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 877 diff changeset	37
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	38	COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	39	SWING Research Group, Czech Technical University in Prague
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	40
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	41	This software is furnished under a license and may be used
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	42	only in accordance with the terms of that license and with the
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	43	inclusion of the above copyright notice. This software may not
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	44	be provided or otherwise made available to, or used by, any
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	45	other person. No title to or ownership of the software is
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	46	hereby transferred.
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	47
1155 d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	48	[1] Code written at SWING Research Group contains a signature
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	49	of one of the above copright owners. For exact set of such code,
d6f6d5fc0343 vranyj1 parents: 1152 diff changeset	50	see the differences between this version and version stx:libjava
1152 040cba55a7d2 Copyright fixes vranyj1 parents: 877 diff changeset	51	as of 1.9.2010
877 f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	52
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	53	"
f5a5b93e1c78 Cleanup phase 1 vranyj1 parents: 814 diff changeset	54	! !
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	55
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	56	!JavaFieldRefTests methodsFor:'permission tests'!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	57
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	58	testAccessingPPFromOutside
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	59	\| javaFieldRef initString \|
1509 366449596854 - stx_libjava vranyj1 parents: 1245 diff changeset	60
366449596854 - stx_libjava vranyj1 parents: 1245 diff changeset	61	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	62	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	63	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	64	[
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	65	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	66	getFieldRefNamed: 'packagePrivateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	67	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	68	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	69	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	70	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	71	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	72
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	73	"Created: / 14-04-2011 / 15:05:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	74	"Modified: / 23-05-2011 / 16:40:03 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
1509 366449596854 - stx_libjava vranyj1 parents: 1245 diff changeset	75	"Modified (format): / 05-07-2012 / 17:27:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	76	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	77
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	78	testAccessingPPFromPackage
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	79	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	80	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	81
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	82
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	83	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	84	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	85	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	86	getFieldRefNamed: 'packagePrivateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	87	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	88	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	89	javaFieldRef owner: (Java classForName: 'stx.libjava.tests.mocks.Crate').
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	90	javaFieldRef resolve. ]
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	91	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	92	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	93
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	94	"Created: / 14-04-2011 / 15:08:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	95	"Modified: / 23-05-2011 / 16:41:32 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	96	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	97
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	98	testAccessingPPFromSubclass
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	99	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	100
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	101
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	102
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	103
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	104	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	105	self shouldnt:
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	106	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	107	getFieldRefNamed: 'packagePrivateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	108	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	109	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	110	javaFieldRef owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	111	javaFieldRef resolve. ]
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	112	raise: Error.
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	113
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	114	"Created: / 14-04-2011 / 15:08:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	115	"Modified: / 23-05-2011 / 16:42:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	116	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	117
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	118	testAccessingPrivateFromOutside
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	119	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	120
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	121
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	122
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	123
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	124	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	125	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	126	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	127	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	128	getFieldRefNamed: 'privateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	129	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	130	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	131	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	132	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	133	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	134
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	135	"Created: / 13-04-2011 / 14:44:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	136	"Modified: / 23-05-2011 / 16:42:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	137	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	138
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	139	testAccessingPrivateFromOutsideInNonPublic
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	140	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	141
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	142
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	143
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	144
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	145	initString := 'Lstx/libjava/tests/mocks/NonPublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	146	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	147	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	148	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	149	getFieldRefNamed: 'privateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	150	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	151	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	152	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	153	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	154	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	155
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	156	"Created: / 13-04-2011 / 14:47:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	157	"Modified: / 23-05-2011 / 16:43:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	158	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	159
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	160	testAccessingPrivateFromSubclass
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	161	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	162
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	163	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	164	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	165	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	166	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	167	getFieldRefNamed: 'privateField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	168	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	169	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	170	javaFieldRef owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	171	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	172	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	173	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	174
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	175	"Created: / 13-04-2011 / 14:49:32 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	176	"Modified: / 23-05-2011 / 16:45:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	177	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	178
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	179	testAccessingProtectedFromOutside
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	180	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	181
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	182
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	183	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	184	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	185	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	186	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	187	getFieldRefNamed: 'protectedField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	188	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	189	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	190
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	191	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	192	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	193	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	194
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	195	"Created: / 13-04-2011 / 14:44:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	196	"Modified: / 23-05-2011 / 16:46:30 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	197	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	198
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	199	testAccessingProtectedFromOutsideInNonPublic
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	200	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	201
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	202
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	203
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	204	initString := 'Lstx/libjava/tests/mocks/NonPublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	205	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	206	should:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	207	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	208	getFieldRefNamed: 'protectedField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	209	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	210	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	211
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	212	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	213	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	214	suchThat: [:e \| e messageText = 'IllegalAccessError' ].
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	215
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	216	"Created: / 13-04-2011 / 14:47:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	217	"Modified: / 23-05-2011 / 16:46:59 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	218	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	219
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	220	testAccessingProtectedFromPackage
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	221	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	222
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	223	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	224	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	225	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	226	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	227	getFieldRefNamed: 'protectedField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	228	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	229	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	230	javaFieldRef owner: (Java classForName: 'stx.libjava.tests.mocks.Crate').
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	231	javaFieldRef resolve. ]
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	232	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	233	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	234
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	235	"Created: / 14-04-2011 / 15:09:02 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	236	"Modified: / 23-05-2011 / 16:48:32 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	237	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	238
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	239	testAccessingProtectedFromSubclass
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	240	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	241
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	242	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	243	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	244	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	245	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	246	getFieldRefNamed: 'protectedField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	247	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	248	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	249	javaFieldRef
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	250	owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	251	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	252	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	253	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	254
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	255	"Created: / 13-04-2011 / 14:49:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	256	"Modified: / 23-05-2011 / 16:49:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	257	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	258
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	259	testAccessingPublicFromOutside
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	260	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	261
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	262	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	263	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	264	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	265	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	266	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	267	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	268	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	269	javaFieldRef
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	270	owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	271	javaFieldRef resolve. ]
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	272	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	273	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	274
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	275	"Created: / 13-04-2011 / 14:44:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	276	"Modified: / 23-05-2011 / 16:51:08 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	277	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	278
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	279	testAccessingPublicFromOutsideInNonPublic
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	280	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	281
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	282	initString := 'Lstx/libjava/tests/mocks/NonPublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	283	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	284	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	285	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	286	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	287	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	288	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	289	javaFieldRef
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	290	owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	291	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	292	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	293	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	294
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	295	"Created: / 13-04-2011 / 14:48:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	296	"Modified: / 23-05-2011 / 16:52:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	297	!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	298
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	299	testAccessingPublicFromSubclass
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	300	\| javaFieldRef initString \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	301
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	302	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	303	self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	304	shouldnt:
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	305	[ javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	306	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	307	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	308	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	309	javaFieldRef
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	310	owner: (Java classForName: 'stx.libjava.tests.mocks.SubclassOfPublicClass').
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	311	javaFieldRef resolve. ]
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	312	raise: Error
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	313	.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	314
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	315	"Created: / 13-04-2011 / 14:49:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	316	"Modified: / 23-05-2011 / 16:52:27 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	317	! !
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	318
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	319	!JavaFieldRefTests methodsFor:'resolving static tests'!
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	320
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	321	testResolvingStatic
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	322	\| javaFieldRef initString result expectedResult \|
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	323	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	324	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	325	getFieldRefNamed: 'publicStaticField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	326	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	327	inClass: initString.
1245 7cf4e252749a resolving unified.. dont forget to update librun hlopkmar parents: 1155 diff changeset	328	result := javaFieldRef resolve.
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	329	expectedResult := (Java
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	330	classForName: 'stx.libjava.tests.mocks.PublicClass') staticFields
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	331	at: 3.
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	332	self assertTrue: (result = expectedResult).
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	333
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	334	"Created: / 28-04-2011 / 22:00:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
1245 7cf4e252749a resolving unified.. dont forget to update librun hlopkmar parents: 1155 diff changeset	335	"Modified: / 08-12-2011 / 19:24:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	336	! !
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	337
43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	338	!JavaFieldRefTests methodsFor:'resolving tests'!
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	339
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	340	testCorrectInstanceCreation
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	341	\| initString javaFieldRef \|
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	342
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	343	initString := 'Ljava/lang/String;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	344	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	345	getFieldRefNamed: 'value'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	346	typed: '[C'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	347	inClass: initString.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	348	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	349	self assertTrue: (javaFieldRef valueCache isNil).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	350	self assertTrue: (javaFieldRef name = 'value').
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	351	self assertTrue: (javaFieldRef descriptor = '[C').
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	352	self assertTrue: (javaFieldRef classRef name = initString).
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	353
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	354	"Created: / 08-04-2011 / 14:01:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	355	"Modified: / 23-05-2011 / 16:28:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	356	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	357
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	358	testCorrectResolving
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	359	\| initString javaFieldRef expectedResult result \|
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	360
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	361	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	362	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	363	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	364	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	365	inClass: initString.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	366	self assertTrue: (javaFieldRef isResolved not).
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	367	javaFieldRef resolve.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	368	self assertTrue: (javaFieldRef isResolved).
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	369	result := javaFieldRef resolve.
771 fb8026dda011 Merged with /trunk vranyj1 parents: 764 diff changeset	370	expectedResult := (Java
fb8026dda011 Merged with /trunk vranyj1 parents: 764 diff changeset	371	classForName: 'stx.libjava.tests.mocks.PublicClass') fields
fb8026dda011 Merged with /trunk vranyj1 parents: 764 diff changeset	372	at: 3.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	373	self assertTrue: (result = expectedResult).
1829 991172ecd928 refreshing tests hlopkmar parents: 1818 diff changeset	374	self assertTrue: (javaFieldRef offset = 4).
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	375	self assertTrue: (javaFieldRef type = 'java.lang.String').
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	376
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	377	"Created: / 08-04-2011 / 14:07:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
1829 991172ecd928 refreshing tests hlopkmar parents: 1818 diff changeset	378	"Modified: / 17-11-2012 / 21:44:49 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	379	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	380
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	381	testInvalidation
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	382	\| javaFieldRef initString \|
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	383
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	384	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	385	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	386	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	387	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	388	inClass: initString.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	389	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	390	javaFieldRef resolve.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	391	self assertTrue: (javaFieldRef isResolved).
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	392	self assertTrue: (javaFieldRef classRef isResolved).
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	393	javaFieldRef invalidate.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	394	self assertTrue: (javaFieldRef isResolved not).
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	395	self assertTrue: (javaFieldRef classRef isResolved not).
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	396
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	397	"Created: / 08-04-2011 / 14:09:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	398	"Modified: / 23-05-2011 / 16:30:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	399	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	400
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	401	testInvalidationForClassNegative
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	402	\| javaFieldRef initString \|
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	403
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	404	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	405	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	406	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	407	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	408	inClass: initString.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	409	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	410	javaFieldRef resolve.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	411	self assertTrue: (javaFieldRef isResolved).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	412	javaFieldRef invalidateForClass: 'Ljava/lang/Object;'.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	413	self assertTrue: (javaFieldRef isResolved).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	414
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	415	"Created: / 08-04-2011 / 16:23:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	416	"Modified: / 23-05-2011 / 16:31:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	417	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	418
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	419	testInvalidationForClassPositive
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	420	\| javaFieldRef initString \|
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	421
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	422	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	423	javaFieldRef := self
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	424	getFieldRefNamed: 'publicField'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	425	typed: 'Ljava/lang/String;'
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	426	inClass: initString.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	427	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	428	javaFieldRef resolve.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	429	self assertTrue: (javaFieldRef isResolved).
761 43e017ec7958 Merged with /branches/jk vranyj1 parents: 758 diff changeset	430	javaFieldRef invalidateForClass: 'Lstx/libjava/tests/mocks/PublicClass;'.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	431	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	432
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	433	"Created: / 08-04-2011 / 16:23:19 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	434	"Modified: / 23-05-2011 / 16:31:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	435	!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	436
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	437	testResolving
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	438	\| javaFieldRef initString \|
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	439	initString := 'Lstx/libjava/tests/mocks/PublicClass;'.
68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	440	javaFieldRef := self getFieldRefNamed: 'publicField' typed:'Ljava/lang/String;' inClass:initString.
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	441
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	442	self assertTrue: (javaFieldRef isResolved not).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	443	javaFieldRef resolve.
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	444	self assertTrue: (javaFieldRef isResolved).
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	445
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	446	"Created: / 08-04-2011 / 14:04:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
814 68df82c46fb0 finally forced myself to refactor tests.. fieldRef tests are ok now.. methodRef to come.. hlopkmar parents: 777 diff changeset	447	"Modified: / 23-05-2011 / 15:53:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
758 be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	448	! !
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	449
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	450	!JavaFieldRefTests class methodsFor:'documentation'!
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	451
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	452	version_SVN
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	453	^ '$Id$'
be8e84381ce0 Merged with /branches/jk vranyj1 parents: diff changeset	454	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Sat, 15 Dec 2012 23:25:19 +0100
branch	development
changeset 1883	b36e52129040
parent 1829	991172ecd928
child 1953	1e42ad3fc322
permissions	-rw-r--r--