2005-04-21 Anthony Green <green@redhat.com>

        PR libgcj/21115
        * testsuite/libjava.special/special.exp,
        testsuite/libjava.special/pr21115I.java,
        testsuite/libjava.special/pr21115.java,
        testsuite/libjava.special/pr21115.out: New files.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98511 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 30 insertions, 0 deletions

diff --git a/libjava/testsuite/libjava.special/special.exp b/libjava/testsuite/libjava.special/special.exp
new file mode 100644
index 00000000000..76afd9a70b0
--- /dev/null
+++ b/libjava/testsuite/libjava.special/special.exp
@@ -0,0 +1,30 @@
+# Special test cases.  These require tricky build procedures.
+
+proc gcj_special_run {} {
+  global srcdir subdir env
+
+  # ---- PR 21115 -------------------------------------------------------
+
+  if {! [bytecompile_file ${srcdir}/${subdir}/pr21115I.java [pwd]]} {
+    fail "bytecompile ${srcdir}/${subdir}/libjava.special/pr21115I.java"
+    # FIXME - should use `untested' on all remaining tests.
+    # But that is hard.
+    return 0
+  }
+  pass "bytecompile pr21115I.java"
+
+    if {! [gcj_link pr21115 pr21115 [list ${srcdir}/${subdir}/pr21115.java]]} {
+    fail "compiling/linking pr21115.java"
+    # FIXME
+    return 0
+  }
+
+  if {! [gcj_invoke pr21115 ${srcdir}/${subdir}/pr21115.out ""]} {
+    # FIXME
+    return 0
+  }
+
+  return 1
+}
+
+gcj_special_run