hg/stx-libjava: JavaReleaseTests.st@e59716e00703 (annotated)

3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"
3324 a58245c0e83a Updated copyright notices. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3299 diff changeset	2	COPYRIGHT (c) 1996-2015 by Claus Gittinger
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4	New code and modifications done at SWING Research Group [1]:
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5
3324 a58245c0e83a Updated copyright notices. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3299 diff changeset	6	COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	SWING Research Group, Czech Technical University in Prague
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	This software is furnished under a license and may be used
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	only in accordance with the terms of that license and with the
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11	inclusion of the above copyright notice. This software may not
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12	be provided or otherwise made available to, or used by, any
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13	other person. No title to or ownership of the software is
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14	hereby transferred.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16	[1] Code written at SWING Research Group contains a signature
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17	of one of the above copright owners. For exact set of such code,
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18	see the differences between this version and version stx:libjava
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	as of 1.9.2010
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20	"
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	21	"{ Package: 'stx:libjava' }"
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	22
3330 b14c58b2876c Oops, moved stray reloading-related methods from stx:libjava/experiments to stx:libjava. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3324 diff changeset	23	"{ NameSpace: Smalltalk }"
b14c58b2876c Oops, moved stray reloading-related methods from stx:libjava/experiments to stx:libjava. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3324 diff changeset	24
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25	TestCase subclass:#JavaReleaseTests
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26	instanceVariableNames:''
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	27	classVariableNames:''
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28	poolDictionaries:''
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29	category:'Languages-Java-Tests'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	30	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	31
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	32	!JavaReleaseTests class methodsFor:'documentation'!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	33
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	34	copyright
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	35	"
3324 a58245c0e83a Updated copyright notices. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3299 diff changeset	36	COPYRIGHT (c) 1996-2015 by Claus Gittinger
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	37
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	38	New code and modifications done at SWING Research Group [1]:
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	39
3324 a58245c0e83a Updated copyright notices. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3299 diff changeset	40	COPYRIGHT (c) 2010-2015 by Jan Vrany, Jan Kurs and Marcel Hlopko
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	41	SWING Research Group, Czech Technical University in Prague
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	42
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	43	This software is furnished under a license and may be used
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	44	only in accordance with the terms of that license and with the
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	45	inclusion of the above copyright notice. This software may not
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	46	be provided or otherwise made available to, or used by, any
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	47	other person. No title to or ownership of the software is
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	48	hereby transferred.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	49
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	50	[1] Code written at SWING Research Group contains a signature
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	51	of one of the above copright owners. For exact set of such code,
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	52	see the differences between this version and version stx:libjava
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	53	as of 1.9.2010
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	"
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56	! !
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58	!JavaReleaseTests methodsFor:'tests'!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	60	test_display_string_known_java_home
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	61	\| release expectedString actualString \|
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	62
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	63	expectedString := 'Open JDK 6 (JRE) ', '- some_path_which_does_not_exist'.
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	64
3287 4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	65	release := JavaRelease::OpenJDK6 new.
4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	66	release javaHome: 'some_path_which_does_not_exist'.
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	67	actualString := release displayString string.
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	68
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	69	self assert: expectedString = actualString
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	70
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	71	"Created: / 07-12-2014 / 13:38:21 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	72	"Modified: / 10-12-2014 / 08:55:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	73	!
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	74
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	75	test_display_string_unknown_java_home
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	76	\| release expectedString actualString \|
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	77
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	78	expectedString := 'Open JDK 6 - not found'.
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	79
3287 4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	80	[
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	81	MessageTracer mock: #searchForJavaHome in: JavaRelease do:[ :receiver \| nil ].
61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	82	release := JavaRelease::OpenJDK6 new.
61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	83	actualString := release displayString string.
3287 4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	84	self assert: expectedString = actualString
4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	85	] ensure:[
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	86	MessageTracer unmock: #searchForJavaHome in: JavaRelease.
3287 4ac115074bce Fixes for JavaRelase>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3285 diff changeset	87	].
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	88
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	89	"Modified: / 07-12-2014 / 13:37:45 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
3299 61e9df43f8a4 Sigh, more fixes for JavaRelease>>displayString tests. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3287 diff changeset	90	"Modified: / 10-12-2014 / 08:54:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3285 19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	91	!
19e3d2dac675 fixed JavaRelease >> displayString for non installed or not found java releases Jakub Nesveda <jakubnesveda@seznam.cz> parents: 3061 diff changeset	92
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	93	test_linux_OpenJDK_1_6_0_30_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	94
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	95	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	96
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	97	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	98	'/usr/lib/jvm/java-6-openjdk-i386'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	99	'/usr/lib/jvm/java-6-openjdk-amd64'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	100	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	101
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	102	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	103	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	104	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	105	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	106	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	107	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	108
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	109	self assert: (JavaRelease openJDK6 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	110	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	111	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	112
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	113	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	114	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	115	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	116
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	117	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	118	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	119
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	120	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	121
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	122	"Created: / 03-04-2014 / 12:50:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	123	"Modified: / 11-03-2015 / 11:05:06 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	124	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	125
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	126	test_linux_OpenJDK_1_6_0_30_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	127
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	128	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	129
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	130	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	131	'/usr/lib/jvm/java-6-openjdk-i386/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	132	'/usr/lib/jvm/java-6-openjdk-amd64/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	133	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	134
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	135	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	136	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	137	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	138	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	139	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	140	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	141
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	142	self assert: (JavaRelease openJDK6 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	143	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	144	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	145
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	146	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	147	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	148	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	149
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	150	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	151	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	152
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	153	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	154
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	155	"Created: / 03-04-2014 / 12:53:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	156	"Modified: / 11-03-2015 / 11:05:00 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	157	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	158
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	159	test_linux_OpenJDK_1_7_0_51_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	160
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	161	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	162
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	163	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	164	'/usr/lib/jvm/java-7-openjdk-amd64'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	165	'/usr/lib/jvm/java-7-openjdk-i386'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	166	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	167
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	168	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	169	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	170	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	171	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	172	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	173	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	174
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	175	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	176	self assert: (JavaRelease openJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	177	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	178
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	179	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	180	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	181	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	182
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	183	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	184	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	185
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	186	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	187
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	188	"Created: / 03-04-2014 / 12:54:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	189	"Modified: / 11-03-2015 / 11:04:54 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	190	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	191
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	192	test_linux_OpenJDK_1_7_0_51_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	193
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	194	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	195
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	196	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	197	'/usr/lib/jvm/java-7-openjdk-amd64/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	198	'/usr/lib/jvm/java-7-openjdk-i386/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	199	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	200
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	201	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	202	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	203	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	204	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	205	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	206	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	207
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	208	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	209	self assert: (JavaRelease openJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	210	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	211
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	212	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	213	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	214	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	215
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	216	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	217	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	218
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	219	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	220
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	221	"Created: / 03-04-2014 / 12:54:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	222	"Modified: / 11-03-2015 / 11:04:48 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	223	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	224
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	225	test_linux_OracleJDK_1_7_0_13_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	226
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	227	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	228
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	229	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	230	'/opt/jdk1.7.0_13'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	231	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	232
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	233	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	234	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	235	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	236	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	237	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	238	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	239
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	240	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	241	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	242	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	243
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	244	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	245	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	246	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	247
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	248	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	249	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	250
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	251	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	252
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	253	"Created: / 03-04-2014 / 14:09:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	254	"Modified: / 11-03-2015 / 11:04:39 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	255	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	256
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	257	test_linux_OracleJDK_1_7_0_13_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	258
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	259	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	260
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	261	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	262	'/opt/jdk1.7.0_13/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	263	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	264
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	265	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	266	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	267	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	268	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	269	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	270	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	271
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	272	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	273	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	274	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	275
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	276	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	277	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	278	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	279
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	280	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	281	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	282
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	283	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	284
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	285	"Created: / 03-04-2014 / 13:04:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	286	"Modified: / 11-03-2015 / 11:04:32 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	287	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	288
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	289	test_linux_OracleJDK_1_8_0_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	290
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	291	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	292
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	293	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	294	'/opt/jdk1.8.0'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	295	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	296
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	297	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	298	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	299	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	300	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	301	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	302	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	303
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	304	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	305	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	306	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	307
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	308	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	309	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	310	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	311
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	312	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	313	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	314
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	315
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	316	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	317
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	318	"Created: / 03-04-2014 / 14:13:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	319	"Modified: / 11-03-2015 / 11:04:22 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	320	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	321
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	322	test_linux_OracleJDK_1_8_0_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	323
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	324	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	325
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	326	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	327	'/opt/jdk1.8.0/jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	328	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	329
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	330	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	331	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	332	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	333	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	334	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	335	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	336
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	337	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	338	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	339	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	340
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	341	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	342	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	343	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	344
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	345	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	346	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	347
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	348
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	349	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	350
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	351	"Created: / 03-04-2014 / 14:13:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	352	"Modified: / 11-03-2015 / 11:04:18 / jv"
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	353	!
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	354
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	355	test_linux_Zulu_7
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	356
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	357	\| java_home \|
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	358
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	359	java_home := #(
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	360	'/usr/lib/jvm/zulu-7-amd64'
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	361	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	362
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	363	java_home notNil ifTrue:[ java_home := java_home asFilename ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	364	self
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	365	skipIf: (java_home isNil or:[ java_home exists not ])
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	366	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	367	ifTrue:[ java_home pathName ]
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	368	ifFalse:[ 'nil' ])).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	369
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	370	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	371	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	372	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	373
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	374	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	375	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	376	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	377
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	378	self assert: (JavaRelease zulu7 validateJavaHome: java_home).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	379	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	380
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	381	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu7))
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	382
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	383	"Created: / 11-03-2015 / 11:39:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	384	!
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	385
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	386	test_liux_Zulu_8
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	387
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	388	\| java_home \|
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	389
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	390	java_home := #(
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	391	'/usr/lib/jvm/zulu-8-amd64'
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	392	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	393
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	394	java_home notNil ifTrue:[ java_home := java_home asFilename ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	395	self
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	396	skipIf: (java_home isNil or:[ java_home exists not ])
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	397	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	398	ifTrue:[ java_home pathName ]
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	399	ifFalse:[ 'nil' ])).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	400
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	401	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	402	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	403	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	404
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	405	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	406	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	407	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	408
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	409	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	410	self assert: (JavaRelease zulu8 validateJavaHome: java_home).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	411
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	412	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu8))
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	413
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	414	"Created: / 11-03-2015 / 11:39:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	415	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	416
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	417	test_windows_OracleJDK_1_6_0_34_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	418
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	419	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	420
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	421	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	422	'C:\Program Files\Java\jdk1.6.0_34'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	423	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	424
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	425	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	426	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	427	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	428	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	429	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	430	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	431
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	432	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	433	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	434	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	435
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	436	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	437	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	438	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	439
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	440	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	441	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	442
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	443
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	444	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	445
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	446	"Created: / 03-04-2014 / 16:45:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	447	"Modified: / 11-03-2015 / 11:04:10 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	448	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	449
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	450	test_windows_OracleJDK_1_6_0_34_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	451
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	452	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	453
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	454	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	455	'C:\Program Files\Java\jdk1.6.0_34\jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	456	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	457
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	458	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	459	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	460	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	461	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	462	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	463	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	464
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	465	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	466	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	467	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	468
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	469	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	470	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	471	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	472
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	473	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	474	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	475
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	476
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	477	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	478
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	479	"Created: / 03-04-2014 / 16:45:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	480	"Modified: / 11-03-2015 / 11:04:05 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	481	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	482
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	483	test_windows_OracleJDK_1_6_0_45_jdk
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	484
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	485	\| java_home \|
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	486
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	487	java_home := #(
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	488	'C:\Program Files\Java\jdk1.6.0_45'
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	489	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	490
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	491	java_home notNil ifTrue:[ java_home := java_home asFilename ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	492	self
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	493	skipIf: (java_home isNil or:[ java_home exists not ])
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	494	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	495	ifTrue:[ java_home pathName ]
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	496	ifFalse:[ 'nil' ])).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	497
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	498	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	499	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	500	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	501
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	502	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	503	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	504	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	505
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	506	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	507	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	508
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	509
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	510	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	511
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	512	"Created: / 20-02-2015 / 14:41:29 / jv"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	513	"Modified: / 11-03-2015 / 11:04:01 / jv"
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	514	!
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	515
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	516	test_windows_OracleJDK_1_6_0_45_jre
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	517
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	518	\| java_home \|
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	519
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	520	java_home := #(
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	521	'C:\Program Files\Java\jdk1.6.0_45\jre'
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	522	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	523
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	524	java_home notNil ifTrue:[ java_home := java_home asFilename ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	525	self
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	526	skipIf: (java_home isNil or:[ java_home exists not ])
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	527	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	528	ifTrue:[ java_home pathName ]
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	529	ifFalse:[ 'nil' ])).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	530
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	531	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	532	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	533	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	534
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	535	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	536	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	537	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	538
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	539	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	540	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	541
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	542
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	543	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	544
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	545	"Created: / 20-02-2015 / 14:41:38 / jv"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	546	"Modified: / 11-03-2015 / 11:03:55 / jv"
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	547	!
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	548
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	549	test_windows_OracleJDK_1_7_0_13_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	550
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	551	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	552
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	553	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	554	'C:\Program Files\Java\jdk1.7.0_13'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	555	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	556
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	557	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	558	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	559	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	560	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	561	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	562	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	563
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	564	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	565	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	566	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	567
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	568	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	569	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	570	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	571
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	572	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	573	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	574
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	575
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	576	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	577
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	578	"Created: / 03-04-2014 / 16:50:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	579	"Modified: / 11-03-2015 / 11:03:48 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	580	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	581
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	582	test_windows_OracleJDK_1_7_0_13_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	583
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	584	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	585
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	586	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	587	'C:\Program Files\Java\jdk1.7.0_13'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	588	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	589
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	590	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	591	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	592	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	593	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	594	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	595	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	596
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	597	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	598	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	599	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	600
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	601	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	602	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	603	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	604
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	605	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	606	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	607
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	608	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	609
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	610	"Created: / 03-04-2014 / 16:50:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	611	"Modified: / 11-03-2015 / 11:03:41 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	612	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	613
3398 579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	614	test_windows_OracleJDK_1_7_0_75_jre
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	615
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	616	\| java_home \|
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	617
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	618	java_home := #(
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	619	'C:\Program Files\Java\jdk1.7.0_76'
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	620	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	621
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	622	java_home notNil ifTrue:[ java_home := java_home asFilename ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	623	self
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	624	skipIf: (java_home isNil or:[ java_home exists not ])
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	625	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	626	ifTrue:[ java_home pathName ]
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	627	ifFalse:[ 'nil' ])).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	628
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	629	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	630	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	631	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	632
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	633	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	634	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	635	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	636
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	637	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	638
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	639	"Created: / 13-03-2015 / 16:02:03 / jv"
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	640	!
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	641
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	642	test_windows_OracleJDK_1_7_0_76_jdk
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	643
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	644	\| java_home \|
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	645
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	646	java_home := #(
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	647	'C:\Program Files\Java\jdk1.7.0_76'
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	648	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	649
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	650	java_home notNil ifTrue:[ java_home := java_home asFilename ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	651	self
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	652	skipIf: (java_home isNil or:[ java_home exists not ])
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	653	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	654	ifTrue:[ java_home pathName ]
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	655	ifFalse:[ 'nil' ])).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	656
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	657	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	658	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	659	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	660
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	661	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	662	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	663	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	664
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	665	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	666
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	667	"Created: / 13-03-2015 / 16:02:22 / jv"
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	668	!
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	669
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	670	test_windows_OracleJDK_1_8_0_05_jdk
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	671
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	672	\| java_home \|
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	673
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	674	java_home := #(
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	675	'C:\Program Files\Java\jdk1.8.0_05'
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	676	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	677
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	678	java_home notNil ifTrue:[ java_home := java_home asFilename ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	679	self
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	680	skipIf: (java_home isNil or:[ java_home exists not ])
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	681	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	682	ifTrue:[ java_home pathName ]
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	683	ifFalse:[ 'nil' ])).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	684
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	685	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	686	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	687	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	688
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	689	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	690	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	691	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	692
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	693	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	694	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	695
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	696
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	697	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	698
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	699	"Created: / 20-02-2015 / 14:40:47 / jv"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	700	"Modified: / 11-03-2015 / 11:03:31 / jv"
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	701	!
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	702
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	703	test_windows_OracleJDK_1_8_0_05_jre
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	704
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	705	\| java_home \|
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	706
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	707	java_home := #(
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	708	'C:\Program Files\Java\jdk1.8.0_05\jre'
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	709	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	710
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	711	java_home notNil ifTrue:[ java_home := java_home asFilename ].
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	712	self
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	713	skipIf: (java_home isNil or:[ java_home exists not ])
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	714	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	715	ifTrue:[ java_home pathName ]
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	716	ifFalse:[ 'nil' ])).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	717
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	718	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	719	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	720	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	721
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	722	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	723	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	724	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	725
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	726	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	727	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	728
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	729
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	730	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	731
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	732	"Created: / 20-02-2015 / 14:41:02 / jv"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	733	"Modified: / 11-03-2015 / 11:03:26 / jv"
3389 5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	734	!
5e24f9add064 Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	735
3398 579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	736	test_windows_OracleJDK_1_8_0_40_jdk
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	737
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	738	\| java_home \|
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	739
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	740	java_home := #(
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	741	'C:\Program Files\Java\jdk1.8.0_40'
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	742	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	743
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	744	java_home notNil ifTrue:[ java_home := java_home asFilename ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	745	self
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	746	skipIf: (java_home isNil or:[ java_home exists not ])
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	747	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	748	ifTrue:[ java_home pathName ]
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	749	ifFalse:[ 'nil' ])).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	750
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	751	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	752	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	753	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	754
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	755	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	756	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	757	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	758
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	759	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	760
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	761	"Created: / 13-03-2015 / 16:03:00 / jv"
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	762	!
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	763
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	764	test_windows_OracleJDK_1_8_0_40_jre
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	765
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	766	\| java_home \|
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	767
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	768	java_home := #(
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	769	'C:\Program Files\Java\jdk1.8.0_40\jre'
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	770	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	771
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	772	java_home notNil ifTrue:[ java_home := java_home asFilename ].
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	773	self
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	774	skipIf: (java_home isNil or:[ java_home exists not ])
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	775	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	776	ifTrue:[ java_home pathName ]
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	777	ifFalse:[ 'nil' ])).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	778
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	779	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	780	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	781	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	782
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	783	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	784	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	785	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	786
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	787	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	788
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	789	"Created: / 13-03-2015 / 16:03:19 / jv"
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	790	!
579f0f85063a Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	791
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	792	test_windows_OracleJDK_1_8_0_jdk
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	793
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	794	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	795
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	796	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	797	'C:\Program Files\Java\jdk1.8.0'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	798	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	799
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	800	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	801	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	802	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	803	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	804	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	805	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	806
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	807	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	808	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	809	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	810
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	811	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	812	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	813	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	814
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	815	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	816	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	817
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	818
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	819	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	820
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	821	"Created: / 03-04-2014 / 17:03:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	822	"Modified: / 11-03-2015 / 11:03:20 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	823	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	824
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	825	test_windows_OracleJDK_1_8_0_jre
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	826
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	827	\| java_home \|
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	828
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	829	java_home := #(
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	830	'C:\Program Files\Java\jdk1.8.0\jre'
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	831	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	832
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	833	java_home notNil ifTrue:[ java_home := java_home asFilename ].
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	834	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	835	skipIf: (java_home isNil or:[ java_home exists not ])
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	836	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	837	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	838	ifFalse:[ 'nil' ])).
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	839
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	840	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	841	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	842	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	843
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	844	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	845	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	846	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	847
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	848	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	849	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	850
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	851	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	852
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	853	"Created: / 03-04-2014 / 17:04:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3393 4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	854	"Modified: / 11-03-2015 / 11:03:13 / jv"
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	855	!
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	856
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	857	test_windows_Zulu_7
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	858
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	859	\| java_home \|
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	860
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	861	java_home := #(
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	862	'C:\Program Files\Zulu\zulu-7'
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	863	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	864
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	865	java_home notNil ifTrue:[ java_home := java_home asFilename ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	866	self
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	867	skipIf: (java_home isNil or:[ java_home exists not ])
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	868	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	869	ifTrue:[ java_home pathName ]
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	870	ifFalse:[ 'nil' ])).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	871
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	872	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	873	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	874	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	875
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	876	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	877	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	878	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	879
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	880	self assert: (JavaRelease zulu7 validateJavaHome: java_home).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	881	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	882
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	883	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu7))
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	884
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	885	"Created: / 11-03-2015 / 11:02:50 / jv"
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	886	!
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	887
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	888	test_windows_Zulu_8
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	889
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	890	\| java_home \|
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	891
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	892	java_home := #(
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	893	'C:\Program Files\Zulu\zulu-8'
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	894	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	895
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	896	java_home notNil ifTrue:[ java_home := java_home asFilename ].
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	897	self
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	898	skipIf: (java_home isNil or:[ java_home exists not ])
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	899	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	900	ifTrue:[ java_home pathName ]
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	901	ifFalse:[ 'nil' ])).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	902
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	903	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	904	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	905	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	906
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	907	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	908	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	909	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	910
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	911	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	912	self assert: (JavaRelease zulu8 validateJavaHome: java_home).
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	913
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	914	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu8))
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	915
4d2f7467c3ff Zulu support: added Zulu7 and Zulu8 JavaReleases Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3389 diff changeset	916	"Created: / 11-03-2015 / 11:02:11 / jv"
3055 10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	917	! !
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	918
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	919	!JavaReleaseTests class methodsFor:'documentation'!
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	920
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	921	version_HG
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	922
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	923	^ '$Changeset: <not expanded> $'
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	924	! !
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	925

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Sun, 26 Apr 2015 21:07:30 +0100
changeset 3442	e59716e00703
parent 3409	f9d023dc6606
child 3508	622620308fee
permissions	-rw-r--r--