aboutsummaryrefslogtreecommitdiff
path: root/libjava/classpath/testsuite/lib/java.exp
diff options
context:
space:
mode:
authorMark Wielaard <mark@gcc.gnu.org>2006-05-18 17:29:21 +0000
committerMark Wielaard <mark@gcc.gnu.org>2006-05-18 17:29:21 +0000
commit4f9533c7722fa07511a94d005227961f4a4dec23 (patch)
tree9f9c470de62ee62fba1331a396450d728d2b1fad /libjava/classpath/testsuite/lib/java.exp
parenteaec4980e139903ae9b274d1abcf3a13946603a8 (diff)
downloadgcc-4f9533c7722fa07511a94d005227961f4a4dec23.zip
gcc-4f9533c7722fa07511a94d005227961f4a4dec23.tar.gz
gcc-4f9533c7722fa07511a94d005227961f4a4dec23.tar.bz2
Imported GNU Classpath 0.90
Imported GNU Classpath 0.90 * scripts/makemake.tcl: LocaleData.java moved to gnu/java/locale. * sources.am: Regenerated. * gcj/javaprims.h: Regenerated. * Makefile.in: Regenerated. * gcj/Makefile.in: Regenerated. * include/Makefile.in: Regenerated. * testsuite/Makefile.in: Regenerated. * gnu/java/lang/VMInstrumentationImpl.java: New override. * gnu/java/net/local/LocalSocketImpl.java: Likewise. * gnu/classpath/jdwp/VMMethod.java: Likewise. * gnu/classpath/jdwp/VMVirtualMachine.java: Update to latest interface. * java/lang/Thread.java: Add UncaughtExceptionHandler. * java/lang/reflect/Method.java: Implements GenericDeclaration and isSynthetic(), * java/lang/reflect/Field.java: Likewise. * java/lang/reflect/Constructor.java * java/lang/Class.java: Implements Type, GenericDeclaration, getSimpleName() and getEnclosing*() methods. * java/lang/Class.h: Add new public methods. * java/lang/Math.java: Add signum(), ulp() and log10(). * java/lang/natMath.cc (log10): New function. * java/security/VMSecureRandom.java: New override. * java/util/logging/Logger.java: Updated to latest classpath version. * java/util/logging/LogManager.java: New override. From-SVN: r113887
Diffstat (limited to 'libjava/classpath/testsuite/lib/java.exp')
-rw-r--r--libjava/classpath/testsuite/lib/java.exp212
1 files changed, 0 insertions, 212 deletions
diff --git a/libjava/classpath/testsuite/lib/java.exp b/libjava/classpath/testsuite/lib/java.exp
deleted file mode 100644
index e122726..0000000
--- a/libjava/classpath/testsuite/lib/java.exp
+++ /dev/null
@@ -1,212 +0,0 @@
-#
-# Author: Petter Reinholdtsen <pere@td.org.uit.no>
-#
-# Java regression tester for DejaGNU
-#
-
-load_lib target.exp
-
-#
-# Compile and run all available java source
-#
-proc test-java-source { } {
- global srcdir
- global subdir
- global runtests
-
- # Find all Java-files
- foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.java]] {
- # If we're only testing specific files and this isn't one of them,
- # skip it.
- if ![runtest_file_p $runtests $src] then {
- continue
- }
-
- java-compile-execute $src
- }
-
- # Find all jasmin (java assambler) files
- foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.j]] {
- # If we're only testing specific files and this isn't one of them,
- # skip it.
- if ![runtest_file_p $runtests $src] then {
- continue
- }
-
- jasmin-assemble-execute $src
- }
-}
-
-#
-# Compile #args
-#
-proc java-compile { args } {
- set src $args
- set output ""
- set options ""
- set comp_output [javac-target-compile "$src" "$output" executable $options];
-}
-
-#
-# Assemble #args
-#
-proc jasmin-assemble { args } {
- set src $args
- set output ""
- set options ""
- set comp_output [jasmin-target-assemble "$src" "$output" executable $options];
-}
-
-#
-# Compile $args and execute java class runtime_test
-#
-proc java-compile-execute { args } {
- global srcdir
- global subdir
-
- set comp_output [java-compile $args]
- if ![regexp "^$" $comp_output] {
- # Do not care about kaffes stupid messages
- #fail $args
- #print "$comp_output"
- #return
- }
-
- global JAVA
- set java $JAVA
-
- set classpath [getenv CLASSPATH]
- setenv CLASSPATH "${srcdir}/$subdir:$classpath"
-
- # XXX There must be a better way to get basename
- catch {exec basename $args .java} basename
- catch {exec $java $basename} run_output
- exec rm -f "${srcdir}/$subdir/$basename.class"
-
- set lines ""
- foreach line [split $run_output \n] {
- if [regexp "PASSED:.*" $line] {
- if ![regexp "^$" $lines] {
- fail "$args $lines"
- }
- pass "$args $line"
- } else {
- if [regexp "FAILED:.*" $line] {
- fail "$args $line"
- } else {
- # Accumulate "wild" lines
- if ![regexp "^$" $lines] {
- set lines "$lines\n $line"
- } else {
- set lines "$line"
- }
- }
- }
- }
- if ![regexp "^$" $lines] {
- fail "$args $lines"
- }
-
- # Reset CLASSPATH
- setenv CLASSPATH "$classpath"
-
- return;
-}
-
-#
-# Compile $args and execute java class runtime_test
-#
-proc jasmin-assemble-execute { args } {
- global srcdir
- global subdir
-
- set comp_output [jasmin-assemble $args]
- if ![regexp "^$" $comp_output] {
- #fail $args
- #print "$comp_output"
- #return
- }
-
- # XXX Should use some default value
- global JAVA
- set java $JAVA
-
- set classpath [getenv CLASSPATH]
- setenv CLASSPATH "${srcdir}/$subdir:$classpath"
-
- # XXX There must be a better way to get basename
- catch {exec basename $args .j} basename
- catch {exec $java $basename} run_output
- exec rm -f "${srcdir}/$subdir/$basename.class"
-
- set lines ""
- foreach line [split $run_output \n] {
- if [regexp "PASSED:.*" $line] {
- if ![regexp "^$" $lines] {
- fail "$args $lines"
- }
- pass "$args $line"
- } else {
- if [regexp "FAILED:.*" $line] {
- fail "$args $line"
- } else {
- # Accumulate "wild" lines
- if ![regexp "^$" $lines] {
- set lines "$lines\n $line"
- } else {
- set lines "$line"
- }
- }
- }
- }
- if ![regexp "^$" $lines] {
- fail "$args $lines"
- }
-
- # Reset CLASSPATH
- setenv CLASSPATH "$classpath"
-
- return;
-}
-
-#
-# Compile java source
-#
-proc javac-target-compile { source dest type options } {
-# XXX Do it the simple way - should use target_compile
-
- global JAVAC
- set javac $JAVAC
-
- catch {exec $javac $source} comp_output
- return $comp_output
-
-# set options ""
-# lappend options "compiler=javac"
-# lappend options "additional_flags=-g"
-# lappend options "libs="
-# lappend options "ldflags="
-# return [target_compile $source $dest $type $options]
-}
-
-#
-# Compile jasmin (java assambly) source
-#
-proc jasmin-target-assemble { source dest type options } {
- global srcdir
- global subdir
-# XXX Do it the simple way - should use target_compile
-
- global JAVA
- set java $JAVA
-
- catch {exec $java jasmin.Main -d $srcdir/$subdir $source} comp_output
-
- return comp_output;
-# set options ""
-# lappend options "compiler=javac"
-# lappend options "additional_flags=-g"
-# lappend options "libs="
-# lappend options "ldflags="
-# return [target_compile $source $dest $type $options]
-}