hg/stx-libjava: src/JavaMethodRefTests.st@040cba55a7d2 (annotated)

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

author	vranyj1
	Wed, 23 Nov 2011 15:26:06 +0000
branch	jk_new_structure
changeset 1152	040cba55a7d2
parent 877	f5a5b93e1c78
child 1155	d6f6d5fc0343
permissions	-rw-r--r--