Tests for ticket #1503.

git-svn-id: http://lampsvn.epfl.ch/svn-repos/scala/scala/trunk@16541 5e8d7ff9-d8ef-0310-90f0-a4852d11357a

test/pending/run/castsingleton.check

@@ -0,0 +1,2 @@
+L()
+L()

test/pending/run/castsingleton.scala

@@ -0,0 +1,10 @@
+object Test extends Application {
+  case class L();
+  object N extends L();
+
+  def empty(xs : L) : Unit = xs match {
+    case x@N => println(x); println(x);
+  }
+
+  empty(L())
+}