hg/stx-libjava: JavaReleaseTests.st@d6b417080b11 (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
3885 81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	93	test_freeBSD_OpenJDK_1_7_0_161_jdk
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	94
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	95	\| java_home \|
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	96
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	97	java_home := #(
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	98	'/usr/local/openjdk7'
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	99	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	100
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	101	java_home notNil ifTrue:[ java_home := java_home asFilename ].
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	102	self
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	103	skipIf: (java_home isNil or:[ java_home exists not ])
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	104	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	105	ifTrue:[ java_home pathName ]
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	106	ifFalse:[ 'nil' ])).
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	107
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	108	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	109	self assert: (JavaRelease openJDK7 validateJavaHome: java_home).
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	110	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	111
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	112	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	113	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	114	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	115
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	116	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	117	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	118
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	119	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK7))
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	120
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	121	"Created: / 03-02-2019 / 23:35:54 / jv"
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	122	!
81a09bfe1d39 FreeBSD: fix OpenJDK7 auto-detection Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3508 diff changeset	123
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	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	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	\| 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	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	'/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	130	'/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	131	) 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	132
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	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	134	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	135	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	136	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	137	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	138	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	139
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	140	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	141	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	142	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	143
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 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	145	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	146	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	147
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	148	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	149	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	150
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	151	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	152
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	"Created: / 03-04-2014 / 12:50:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	154	"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	155	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	156
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	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	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	\| 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	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	'/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	163	'/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	164	) 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	165
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	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	167	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	168	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	169	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	170	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	171	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	172
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	173	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	174	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	175	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	176
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 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	178	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	179	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	180
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	181	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	182	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	183
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	184	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	185
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	"Created: / 03-04-2014 / 12:53:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	187	"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	188	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	189
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	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	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	\| 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	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	'/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	196	'/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	197	) 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	198
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	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	200	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	201	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	202	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	203	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	204	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	205
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	206	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	207	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	208	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	209
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 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	211	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	212	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	213
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	214	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	215	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	216
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	217	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	218
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	"Created: / 03-04-2014 / 12:54:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	220	"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	221	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	222
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	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	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	\| 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	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	'/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	229	'/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	230	) 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	231
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	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	233	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	234	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	235	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	236	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	237	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	238
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	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	240	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	241	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	242
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	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	244	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	245	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	246
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	247	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	248	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	249
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	250	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	251
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	"Created: / 03-04-2014 / 12:54:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	253	"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	254	!
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	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	257
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	\| 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	259
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	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	261	'/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	262	) 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	263
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	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	265	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	266	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	267	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	268	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	269	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	270
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	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	272	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	273	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	274
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	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	276	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	277	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	278
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	279	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	280	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	281
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	282	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	283
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	"Created: / 03-04-2014 / 14:09:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	285	"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	286	!
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	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	289
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	\| 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	291
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	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	293	'/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	294	) 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	295
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	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	297	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	298	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	299	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	300	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	301	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	302
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	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	304	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	305	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	306
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	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	308	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	309	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	310
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	311	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	312	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	313
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	314	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	315
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	"Created: / 03-04-2014 / 13:04:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	317	"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	318	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	319
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	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	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	\| 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	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	'/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	326	) 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	327
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	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	329	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	330	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	331	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	332	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	333	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	334
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	335	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	336	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	337	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	338
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 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	340	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	341	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	342
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	343	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	344	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	345
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	346
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	347	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	348
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	"Created: / 03-04-2014 / 14:13:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	350	"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	351	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	352
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	353	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	354
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	355	\| 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	356
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	357	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	358	'/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	359	) 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	360
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	361	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	362	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	363	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	364	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	365	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	366	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	367
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	368	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	369	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	370	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	371
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	372	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	373	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	374	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	375
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	376	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	377	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	378
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	379
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	380	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	381
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	382	"Created: / 03-04-2014 / 14:13:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	383	"Modified: / 11-03-2015 / 11:04:18 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	384	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	385
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	386	test_linux_Zulu_7
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	387
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	388	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	389
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	390	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	391	'/usr/lib/jvm/zulu-7-amd64'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	392	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	393
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	394	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	395	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	396	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	397	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	398	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	399	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	400
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	401	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	402	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	403	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	404
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	405	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	406	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	407	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	408
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	409	self assert: (JavaRelease zulu7 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	410	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	411
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	412	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu7))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	413
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	414	"Created: / 11-03-2015 / 11:39:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	415	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	416
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	417	test_liux_Zulu_8
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	418
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	419	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	420
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	421	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	422	'/usr/lib/jvm/zulu-8-amd64'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	423	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	424
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	425	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	426	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	427	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	428	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	429	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	430	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	431
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	432	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	433	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	434	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	435
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	436	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	437	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	438	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	439
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	440	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	441	self assert: (JavaRelease zulu8 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	442
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	443	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu8))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	444
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	445	"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	446	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	447
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	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	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	\| 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	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	'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	454	) 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	455
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	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	457	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	458	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	459	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	460	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	461	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	462
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	463	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	464	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	465	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	466
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 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	468	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	469	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	470
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	471	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	472	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	473
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	474
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	475	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	476
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	"Created: / 03-04-2014 / 16:45:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	478	"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	479	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	480
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	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	482
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	483	\| 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	484
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	485	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	486	'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	487	) 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	488
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	489	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	490	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	491	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	492	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	493	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	494	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	495
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	496	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	497	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	498	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	499
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	500	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	501	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	502	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	503
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	504	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	505	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	506
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	507
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	508	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	509
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	510	"Created: / 03-04-2014 / 16:45:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	511	"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	512	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	513
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	514	test_windows_OracleJDK_1_6_0_45_jdk
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	515
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	516	\| java_home \|
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	517
cdb00120c2fd 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 := #(
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	519	'C:\Program Files\Java\jdk1.6.0_45'
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	520	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	521
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	522	java_home notNil ifTrue:[ java_home := java_home asFilename ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	523	self
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	524	skipIf: (java_home isNil or:[ java_home exists not ])
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	525	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	526	ifTrue:[ java_home pathName ]
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	527	ifFalse:[ 'nil' ])).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	528
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	529	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	530	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
cdb00120c2fd 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 openJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	532
cdb00120c2fd 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 oracleJDK6 validateJavaHome: java_home).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	534	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
cdb00120c2fd 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 oracleJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	536
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	537	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	538	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	539
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	540
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	541	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	542
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	543	"Created: / 20-02-2015 / 14:41:29 / jv"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	544	"Modified: / 11-03-2015 / 11:04:01 / jv"
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	545	!
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	546
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	547	test_windows_OracleJDK_1_6_0_45_jre
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	548
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	549	\| java_home \|
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	550
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	551	java_home := #(
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	552	'C:\Program Files\Java\jdk1.6.0_45\jre'
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	553	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	554
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	555	java_home notNil ifTrue:[ java_home := java_home asFilename ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	556	self
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	557	skipIf: (java_home isNil or:[ java_home exists not ])
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	558	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	559	ifTrue:[ java_home pathName ]
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	560	ifFalse:[ 'nil' ])).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	561
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	562	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	563	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	564	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	565
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	566	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	567	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	568	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	569
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	570	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	571	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	572
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	573
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	574	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OpenJDK6))
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	575
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	576	"Created: / 20-02-2015 / 14:41:38 / jv"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	577	"Modified: / 11-03-2015 / 11:03:55 / jv"
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	578	!
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	579
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	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	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	\| 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	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	'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	586	) 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	587
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	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	589	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	590	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	591	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	592	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	593	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	594
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	595	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	596	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	597	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	598
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 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	600	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	601	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	602
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	603	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	604	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	605
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	606
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	607	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	608
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	"Created: / 03-04-2014 / 16:50:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	610	"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	611	!
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	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	614
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	615	\| 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	616
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	617	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	618	'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	619	) 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	620
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	621	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	622	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	623	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	624	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	625	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	626	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	627
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	628	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	629	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	630	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	631
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	632	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	633	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	634	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	635
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	636	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	637	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	638
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	639	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	640
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	641	"Created: / 03-04-2014 / 16:50:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	642	"Modified: / 11-03-2015 / 11:03:41 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	643	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	644
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	645	test_windows_OracleJDK_1_7_0_75_jre
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	646
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	647	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	648
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	649	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	650	'C:\Program Files\Java\jdk1.7.0_76'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	651	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	652
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	653	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	654	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	655	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	656	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	657	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	658	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	659
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	660	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	661	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	662	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	663
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	664	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	665	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	666	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	667
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	668	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	669
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	670	"Created: / 13-03-2015 / 16:02:03 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	671	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	672
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	673	test_windows_OracleJDK_1_7_0_76_jdk
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	674
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	675	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	676
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	677	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	678	'C:\Program Files\Java\jdk1.7.0_76'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	679	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	680
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	681	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	682	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	683	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	684	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	685	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	686	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	687
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	688	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	689	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	690	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	691
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	692	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	693	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	694	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	695
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	696	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK7))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	697
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	698	"Created: / 13-03-2015 / 16:02:22 / jv"
3406 e18d5c89221d Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3393 diff changeset	699	!
e18d5c89221d Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3393 diff changeset	700
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	701	test_windows_OracleJDK_1_8_0_05_jdk
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	702
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	703	\| java_home \|
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	704
cdb00120c2fd 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 := #(
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	706	'C:\Program Files\Java\jdk1.8.0_05'
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	707	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	708
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	709	java_home notNil ifTrue:[ java_home := java_home asFilename ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	710	self
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	711	skipIf: (java_home isNil or:[ java_home exists not ])
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	712	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	713	ifTrue:[ java_home pathName ]
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	714	ifFalse:[ 'nil' ])).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	715
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	716	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	717	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
cdb00120c2fd 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 openJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	719
cdb00120c2fd 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 oracleJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	721	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
cdb00120c2fd 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 oracleJDK8 validateJavaHome: java_home).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	723
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	724	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	725	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	726
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	727
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	728	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	729
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	730	"Created: / 20-02-2015 / 14:40:47 / jv"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	731	"Modified: / 11-03-2015 / 11:03:31 / jv"
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	732	!
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	733
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	734	test_windows_OracleJDK_1_8_0_05_jre
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	735
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	736	\| java_home \|
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	737
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	738	java_home := #(
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	739	'C:\Program Files\Java\jdk1.8.0_05\jre'
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	740	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	741
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	742	java_home notNil ifTrue:[ java_home := java_home asFilename ].
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	743	self
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	744	skipIf: (java_home isNil or:[ java_home exists not ])
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	745	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	746	ifTrue:[ java_home pathName ]
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	747	ifFalse:[ 'nil' ])).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	748
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	749	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	750	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	751	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	752
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	753	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	754	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	755	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	756
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	757	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	758	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	759
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	760
3378 cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	761	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	762
cdb00120c2fd Fix in JavaRelease: correctly detect Java home on Windows for Oracle Java. Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3330 diff changeset	763	"Created: / 20-02-2015 / 14:41:02 / jv"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	764	"Modified: / 11-03-2015 / 11:03:26 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	765	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	766
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	767	test_windows_OracleJDK_1_8_0_40_jdk
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	768
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	769	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	770
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	771	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	772	'C:\Program Files\Java\jdk1.8.0_40'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	773	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	774
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	775	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	776	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	777	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	778	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	779	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	780	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	781
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	782	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	783	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	784	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	785
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	786	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	787	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	788	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	789
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	790	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	791
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	792	"Created: / 13-03-2015 / 16:03:00 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	793	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	794
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	795	test_windows_OracleJDK_1_8_0_40_jre
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	796
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	797	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	798
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	799	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	800	'C:\Program Files\Java\jdk1.8.0_40\jre'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	801	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	802
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	803	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	804	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	805	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	806	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	807	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	808	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	809
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	810	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	811	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	812	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	813
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	814	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	815	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	816	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	817
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	818	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::OracleJDK8))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	819
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	820	"Created: / 13-03-2015 / 16:03:19 / jv"
3406 e18d5c89221d Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3393 diff changeset	821	!
e18d5c89221d Java release: consult 64bit registry entries as well as 32 bit when searching for installed JDKs Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3393 diff changeset	822
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	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	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	\| 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	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	'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	829	) 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	830
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	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	832	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	833	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	834	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	835	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	836	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	837
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	838	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	839	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	840	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	841
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 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	843	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	844	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	845
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	846	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	847	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	848
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	849
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	850	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	851
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	"Created: / 03-04-2014 / 17:03:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	853	"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	854	!
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	855
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	856	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	857
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	858	\| 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	859
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	860	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	861	'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	862	) 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	863
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	864	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	865	self
3061 d64f0b5cc383 Oops, fixed condition in skipIf: in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3060 diff changeset	866	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	867	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	868	ifTrue:[ java_home pathName ]
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	869	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	870
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	871	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	872	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	873	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	874
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	875	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	876	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	877	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	878
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	879	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	880	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	881
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	882	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	883
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	884	"Created: / 03-04-2014 / 17:04:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3431 82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	885	"Modified: / 11-03-2015 / 11:03:13 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	886	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	887
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	888	test_windows_Zulu_7
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	889
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	890	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	891
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	892	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	893	'C:\Program Files\Zulu\zulu-7'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	894	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	895
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	896	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	897	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	898	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	899	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	900	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	901	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	902
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	903	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	904	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	905	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	906
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	907	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	908	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	909	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	910
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	911	self assert: (JavaRelease zulu7 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	912	self assert: (JavaRelease zulu8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	913
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	914	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu7))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	915
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	916	"Created: / 11-03-2015 / 11:02:50 / jv"
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	917	!
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	918
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	919	test_windows_Zulu_8
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	920
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	921	\| java_home \|
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	922
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	923	java_home := #(
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	924	'C:\Program Files\Zulu\zulu-8'
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	925	) detect:[:each \| each asFilename exists ] ifNone:[ nil ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	926
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	927	java_home notNil ifTrue:[ java_home := java_home asFilename ].
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	928	self
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	929	skipIf: (java_home isNil or:[ java_home exists not ])
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	930	description: ('Directory does not exist (%1)' bindWith:(java_home notNil
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	931	ifTrue:[ java_home pathName ]
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	932	ifFalse:[ 'nil' ])).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	933
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	934	self assert: (JavaRelease openJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	935	self assert: (JavaRelease openJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	936	self assert: (JavaRelease openJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	937
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	938	self assert: (JavaRelease oracleJDK6 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	939	self assert: (JavaRelease oracleJDK7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	940	self assert: (JavaRelease oracleJDK8 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	941
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	942	self assert: (JavaRelease zulu7 validateJavaHome: java_home) not.
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	943	self assert: (JavaRelease zulu8 validateJavaHome: java_home).
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	944
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	945	self assert: ((JavaRelease inDirectory: java_home) isKindOf: (JavaRelease::Zulu8))
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	946
82790b1e6d54 Merged with mercurial revision 4f3cc813be4 (8 changesets total) Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3429 diff changeset	947	"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	948	! !
10b7a8f2e23c Change JavaRelease to use output of `java -version` when validating Java installation directory. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	949
3060 f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	950	!JavaReleaseTests class methodsFor:'documentation'!
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	951
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	952	version_HG
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	953
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	954	^ '$Changeset: <not expanded> $'
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	955	! !
f252b6759c9e Fixed DNU in JavaReleaseTests Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3055 diff changeset	956

author	convert-repo
	Mon, 24 Feb 2020 04:28:37 +0000
changeset 4001	d6b417080b11
parent 3885	81a09bfe1d39
permissions	-rw-r--r--