Some more work on options related to showing co...

Some more work on options related to showing compiler structures during
compilation. The pickler knew more than was healthy about things like
compiler settings, so I let the pickler worry about pickling and moved
that logic somewhere closer to the surface. Some convenience oriented
tweaks to command line phase parsing. The end result is as follows (some
output trimmed for brevity.)

// dippy.scala
class Dippy {
  def f[T <: Dippy](x: T) = (x, x)
  object DingusDippy extends util.Random { }
}
// className@phaseString should be reliably unambiguous
% scalac -Xshow-class Dippy@typer,erasure,jvm dippy.scala

<<-- class Dippy after phase 'typer' -->>
Members (excluding Any/AnyRef unless overridden):
  final object DingusDippy extends object Dippy.this.DingusDippy
  def f[T <: Dippy](x: T): (T, T)

<<-- class Dippy after phase 'erasure' -->>
Members (excluding Any/AnyRef unless overridden):
  private lazy var DingusDippy$module: object Dippy#DingusDippy
  lazy val DingusDippy(): object Dippy#DingusDippy
  def f(x: Dippy): Tuple2

<<-- class Dippy after phase 'jvm' -->>
Members (excluding Any/AnyRef unless overridden):
  protected var bitmap$0: Int
  private lazy var DingusDippy$module: object Dippy$DingusDippy
  lazy val DingusDippy(): object Dippy$DingusDippy
  def f(x: Dippy): Tuple2

No review.

1 files changed, 2 insertions, 2 deletions

diff --git a/test/files/run/global-showdef.scala b/test/files/run/global-showdef.scala
index 0b34fc4548..e17f438247 100644
--- a/test/files/run/global-showdef.scala
+++ b/test/files/run/global-showdef.scala
@@ -55,8 +55,8 @@ object Bippy {
     }
     output split "\\n" toList
   }
-  def showClass(name: String) = lines("-Xshow-class", name)
-  def showObject(name: String) = lines("-Xshow-object", name)
+  def showClass(name: String) = lines("-Yshow:typer", "-Xshow-class", name)
+  def showObject(name: String) = lines("-Yshow:typer", "-Xshow-object", name)
 
   def show(xs: List[String]) = {
     xs filter (x => (x contains "def showdefTestMember") || (x startsWith "<<-- ")) foreach println