OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

jacks.exp (gcj_jacks_write): Add deprecation flag to the gcj_setup. 

2004-07-14  Andreas Tobler  <a.tobler@schweiz.ch>

	* testsuite/libjava.jacks/jacks.exp (gcj_jacks_write): Add deprecation
	flag to the gcj_setup.
	(gcj_jacks_run): Check tclsh version and launch jacks directly with
	the tclsh.
	* testsuite/libjava.jacks/jacks.xfail: Update fails to reflect the
	deprecation flag change. 58 XFAILS removed.

From-SVN: r84710
This commit is contained in:
Andreas Tobler 2004-07-14 22:45:55 +02:00 committed by Andreas Tobler
parent 85d91d5b1d
commit 7cb73054a6
3 changed files with 24 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
libjava/ChangeLog
View File

@ -1,3 +1,12 @@
2004-07-14 Andreas Tobler <a.tobler@schweiz.ch>
* testsuite/libjava.jacks/jacks.exp (gcj_jacks_write): Add deprecation
flag to the gcj_setup.
(gcj_jacks_run): Check tclsh version and launch jacks directly with
the tclsh.
* testsuite/libjava.jacks/jacks.xfail: Update fails to reflect the
deprecation flag change. 58 XFAILS removed.
2004-07-14 Ulrich Weigand <uweigand@de.ibm.com>
* configure.host (DIVIDESPEC) [s390*-*-*]: Set to

18
libjava/testsuite/libjava.jacks/jacks.exp
View File

@ -35,6 +35,7 @@ proc gcj_jacks_write {filename} {
puts $fd "set JAVA_FLAGS \"-mx=64m\""
puts $fd "set JAVAC_ENCODING_FLAG --encoding="
puts $fd "set JAVAC_DEPRECATION_FLAG -Wdeprecated"
puts $fd "set tcltest::testConstraints(encoding) 1"
puts $fd "set tcltest::testConstraints(gcj) 1"
puts $fd "set tcltest::testConstraints(assert) 1"
@ -97,9 +98,20 @@ proc gcj_jacks_run {} {
verbose "Running Jacks..."
# Just ignore error exits from the jacks program.
# It will always error exit for us, since don't completely pass.
catch {exec ./jacks gcj} msg
gcj_jacks_parse logging/gcj.log
# At the moment jacks has a hardcoded call to tclsh8.3. To override this,
# we check here on the version and launch the script directly with the
# tclsh$tcl_ver.
set tcl_ver [info tclversion]
if {[package vcompare $tcl_ver 8.3] >= 0 } {
if {[catch {exec tclsh$tcl_ver jacks gcj} msg]} {
send_log "Couldn't run jacks: $msg\n"
return
}
gcj_jacks_parse logging/gcj.log
} else {
send_log "No suitable tclsh found, you need at least version 8.3 or up.\n"
return
}
cd $here
}

58
libjava/testsuite/libjava.jacks/jacks.xfail
View File

@ -446,74 +446,16 @@
4.5.4-parameter-3
4.5.4-static-1
4.5.4-static-5
4.7.10-jvms-class-1
4.7.10-jvms-class-10
4.7.10-jvms-class-11
4.7.10-jvms-class-12
4.7.10-jvms-class-13
4.7.10-jvms-class-14
4.7.10-jvms-class-15
4.7.10-jvms-class-16
4.7.10-jvms-class-17
4.7.10-jvms-class-18
4.7.10-jvms-class-19
4.7.10-jvms-class-2
4.7.10-jvms-class-3
4.7.10-jvms-class-4
4.7.10-jvms-class-5
4.7.10-jvms-class-6
4.7.10-jvms-class-7
4.7.10-jvms-class-8
4.7.10-jvms-class-9
4.7.10-jvms-constructor-1
4.7.10-jvms-constructor-10
4.7.10-jvms-constructor-11
4.7.10-jvms-constructor-12
4.7.10-jvms-constructor-13
4.7.10-jvms-constructor-14
4.7.10-jvms-constructor-2
4.7.10-jvms-constructor-3
4.7.10-jvms-constructor-4
4.7.10-jvms-constructor-5
4.7.10-jvms-constructor-6
4.7.10-jvms-constructor-7
4.7.10-jvms-constructor-8
4.7.10-jvms-constructor-9
4.7.10-jvms-field-1
4.7.10-jvms-field-10
4.7.10-jvms-field-11
4.7.10-jvms-field-12
4.7.10-jvms-field-13
4.7.10-jvms-field-2
4.7.10-jvms-field-3
4.7.10-jvms-field-4
4.7.10-jvms-field-5
4.7.10-jvms-field-6
4.7.10-jvms-field-7
4.7.10-jvms-field-8
4.7.10-jvms-field-9
4.7.10-jvms-lex-1
4.7.10-jvms-lex-10
4.7.10-jvms-lex-2
4.7.10-jvms-lex-3
4.7.10-jvms-lex-4
4.7.10-jvms-lex-5
4.7.10-jvms-lex-6
4.7.10-jvms-lex-7
4.7.10-jvms-lex-8
4.7.10-jvms-lex-9
4.7.10-jvms-method-1
4.7.10-jvms-method-10
4.7.10-jvms-method-11
4.7.10-jvms-method-12
4.7.10-jvms-method-2
4.7.10-jvms-method-3
4.7.10-jvms-method-4
4.7.10-jvms-method-5
4.7.10-jvms-method-6
4.7.10-jvms-method-7
4.7.10-jvms-method-8
4.7.10-jvms-method-9
5.1.2-btd-1
5.1.2-btd-3
5.1.2-btd-5