Merge pull request #406 from ucb-bar/addmiddlefirrtlcompiler

Add support for top-level use of MiddleFirrtlCompiler.

5 files changed, 50 insertions, 3 deletions

diff --git a/src/main/scala/firrtl/ExecutionOptionsManager.scala b/src/main/scala/firrtl/ExecutionOptionsManager.scala
index ab900a36..62ecb1c9 100644
--- a/src/main/scala/firrtl/ExecutionOptionsManager.scala
+++ b/src/main/scala/firrtl/ExecutionOptionsManager.scala
@@ -161,6 +161,7 @@ case class FirrtlExecutionOptions(
     compilerName match {
       case "high"      => new HighFirrtlCompiler()
       case "low"       => new LowFirrtlCompiler()
+      case "middle"    => new MiddleFirrtlCompiler()
       case "verilog"   => new VerilogCompiler()
     }
   }
@@ -170,6 +171,7 @@ case class FirrtlExecutionOptions(
       case "verilog"   => "v"
       case "low"       => "lo.fir"
       case "high"      => "hi.fir"
+      case "middle"    => "mid.fir"
       case _ =>
         throw new Exception(s"Illegal compiler name $compilerName")
     }
@@ -247,12 +249,12 @@ trait HasFirrtlOptions {
 
   parser.opt[String]("compiler")
     .abbr("X")
-    .valueName ("<high|low|verilog>")
+    .valueName ("<high|middle|low|verilog>")
     .foreach { x =>
       firrtlOptions = firrtlOptions.copy(compilerName = x)
     }
     .validate { x =>
-      if (Array("high", "low", "verilog").contains(x.toLowerCase)) parser.success
+      if (Array("high", "middle", "low", "verilog").contains(x.toLowerCase)) parser.success
       else parser.failure(s"$x not a legal compiler")
     }.text {
       s"compiler to use, default is ${firrtlOptions.compilerName}"
@@ -342,7 +344,7 @@ sealed trait FirrtlExecutionResult
   * Indicates a successful execution of the firrtl compiler, returning the compiled result and
   * the type of compile
   *
-  * @param emitType  The name of the compiler used, currently "high", "low", or "verilog"
+  * @param emitType  The name of the compiler used, currently "high", "middle", "low", or "verilog"
   * @param emitted   The text result of the compilation, could be verilog or firrtl text.
   */
 case class FirrtlExecutionSuccess(emitType: String, emitted: String) extends FirrtlExecutionResult
diff --git a/src/main/scala/firrtl/LoweringCompilers.scala b/src/main/scala/firrtl/LoweringCompilers.scala
index c29ce01a..44d3a757 100644
--- a/src/main/scala/firrtl/LoweringCompilers.scala
+++ b/src/main/scala/firrtl/LoweringCompilers.scala
@@ -119,6 +119,12 @@ class HighFirrtlCompiler extends Compiler {
   def transforms: Seq[Transform] = getLoweringTransforms(ChirrtlForm, HighForm)
 }
 
+/** Emits middle Firrtl input circuit */
+class MiddleFirrtlCompiler extends Compiler {
+  def emitter = new FirrtlEmitter
+  def transforms: Seq[Transform] = getLoweringTransforms(ChirrtlForm, MidForm)
+}
+
 /** Emits lowered input circuit */
 class LowFirrtlCompiler extends Compiler {
   def emitter = new FirrtlEmitter
diff --git a/src/test/scala/firrtlTests/CompilerTests.scala b/src/test/scala/firrtlTests/CompilerTests.scala
index 2a5311f8..a9fce0c2 100644
--- a/src/test/scala/firrtlTests/CompilerTests.scala
+++ b/src/test/scala/firrtlTests/CompilerTests.scala
@@ -14,6 +14,7 @@ import firrtl.{
   CircuitState,
   Compiler,
   HighFirrtlCompiler,
+  MiddleFirrtlCompiler,
   LowFirrtlCompiler,
   Parser,
   VerilogCompiler
@@ -61,6 +62,42 @@ class HighFirrtlCompilerSpec extends CompilerSpec with Matchers {
 }
 
 /**
+  * An example test for testing the MiddleFirrtlCompiler.
+  *
+  * Given an input Firrtl circuit (expressed as a string),
+  * the compiler is executed. The output of the compiler is
+  * a lowered (to MidForm) version of the input circuit. The output is
+  * string compared to the correct lowered circuit.
+  */
+class MiddleFirrtlCompilerSpec extends CompilerSpec with Matchers {
+   val compiler = new MiddleFirrtlCompiler()
+   val input =
+      """
+circuit Top :
+  module Top :
+    input reset : UInt<1>
+    input a : UInt<1>[2]
+    wire b : UInt
+    b <= a[0]
+    when reset :
+      b <= UInt(0)
+"""
+   // Verify that Vecs are retained, but widths are inferred and whens are expanded.
+   val check = Seq(
+      "circuit Top :",
+      "  module Top :",
+      "    input reset : UInt<1>",
+      "    input a : UInt<1>[2]",
+      "    wire b : UInt<1>",
+      "    node _GEN_0 = mux(reset, UInt<1>(\"h0\"), a[0])",
+      "    b <= _GEN_0\n\n"
+   ).reduce(_ + "\n" + _)
+   "A circuit" should "match exactly to its MidForm state" in {
+      (parse(getOutput)) should be (parse(check))
+   }
+}
+
+/**
  * An example test for testing the LoweringCompiler.
  *
  * Given an input Firrtl circuit (expressed as a string),
diff --git a/src/test/scala/firrtlTests/DriverSpec.scala b/src/test/scala/firrtlTests/DriverSpec.scala
index 26b32baa..9f29b918 100644
--- a/src/test/scala/firrtlTests/DriverSpec.scala
+++ b/src/test/scala/firrtlTests/DriverSpec.scala
@@ -156,6 +156,7 @@ class DriverSpec extends FreeSpec with Matchers with BackendCompilationUtilities
       Seq(
         "low" -> "./Dummy.lo.fir",
         "high" -> "./Dummy.hi.fir",
+        "middle" -> "./Dummy.mid.fir",
         "verilog" -> "./Dummy.v"
       ).foreach { case (compilerName, expectedOutputFileName) =>
         val manager = new ExecutionOptionsManager("test") with HasFirrtlOptions {
diff --git a/src/test/scala/firrtlTests/MultiThreadingSpec.scala b/src/test/scala/firrtlTests/MultiThreadingSpec.scala
index 169aa6b2..1698c462 100644
--- a/src/test/scala/firrtlTests/MultiThreadingSpec.scala
+++ b/src/test/scala/firrtlTests/MultiThreadingSpec.scala
@@ -21,6 +21,7 @@ class MultiThreadingSpec extends FirrtlPropSpec {
     // The parameters we're testing with
     val compilers = Seq(
       new firrtl.HighFirrtlCompiler,
+      new firrtl.MiddleFirrtlCompiler,
       new firrtl.LowFirrtlCompiler,
       new firrtl.VerilogCompiler)
     val inputFilePath = s"/integration/GCDTester.fir" // arbitrary