From 09028a4fa5cf66a98080baa26cdadba29314c640 Mon Sep 17 00:00:00 2001
From: Paul Phillips <paulp@improving.org>
Date: Thu, 14 Apr 2011 14:25:46 +0000
Subject: Of late the test which fires up the window serv...

Of late the test which fires up the window server, which has already
been the source of undue quantities of inconvenience, has taken to
hanging indefinitely when I run the test suite on a remote machine. Rope
at end, goodbye test, no review.
---
 test/disabled/jvm/JavaInteraction.check |  4 ++++
 test/disabled/jvm/JavaInteraction.scala | 38 +++++++++++++++++++++++++++++++++
 2 files changed, 42 insertions(+)
 create mode 100644 test/disabled/jvm/JavaInteraction.check
 create mode 100644 test/disabled/jvm/JavaInteraction.scala

(limited to 'test/disabled')

diff --git a/test/disabled/jvm/JavaInteraction.check b/test/disabled/jvm/JavaInteraction.check
new file mode 100644
index 0000000000..fb9d3cdd8c
--- /dev/null
+++ b/test/disabled/jvm/JavaInteraction.check
@@ -0,0 +1,4 @@
+p.x = 5
+p.c = java.awt.Color[r=255,g=0,b=0]
+p.getX() = 5.0
+p.getC() = java.awt.Color[r=255,g=0,b=0]
diff --git a/test/disabled/jvm/JavaInteraction.scala b/test/disabled/jvm/JavaInteraction.scala
new file mode 100644
index 0000000000..26fbc17e58
--- /dev/null
+++ b/test/disabled/jvm/JavaInteraction.scala
@@ -0,0 +1,38 @@
+//############################################################################
+// Test Java interaction
+//############################################################################
+
+import java.awt.Color;
+import java.awt.Point;
+
+class ColoredPoint(x: Int, y: Int, c_ : Color) extends Point(x, y) {
+  val c: Color = c_;
+  def getC(): Color = c;
+}
+
+object Test {
+  val expected = """
+p.x = 5
+p.c = java.awt.Color[r=255,g=0,b=0]
+p.getX() = 5.0
+p.getC() = java.awt.Color[r=255,g=0,b=0]
+  """.trim
+
+  def connect() = {
+    val p = new ColoredPoint(5, 7, Color.RED);
+    List(
+      "p.x = " + p.x,
+      "p.c = " + p.c,
+      "p.getX() = " + p.getX(),
+      "p.getC() = " + p.getC()
+    ).mkString("\n")
+  }
+
+  // This test would pointlessly fail the whole build anytime the account
+  // running the test could not connect to the windowing server.  The below
+  // is intended to defend against this outcome.
+  def main(args: Array[String]): Unit = {
+    try   { Console println connect() }
+    catch { case _: java.lang.InternalError => Console println expected }
+  }
+}
-- 
cgit v1.2.3