Add run tests

Author: nicolasstucki

build.sbt

@@ -8,6 +8,7 @@ lazy val root = (project in file(".")).
     scalaVersion := dottyVersion,
 
     libraryDependencies ++= Seq(
+      "ch.epfl.lamp" % "dotty_0.6" % "0.6.0-RC1" % "test->runtime",
       "com.novocode" % "junit-interface" % "0.11" % "test"
     )
   )

src/test/scala/quoted/util/QuoteDriver.scala

@@ -0,0 +1,74 @@
+// QUICK FIX
+// TODO remove this file in 0.7
+// Copy of fix in https://github.com/lampepfl/dotty/pull/3871
+
+package scala.quoted
+package util
+
+import dotty.tools.dotc.Driver
+import dotty.tools.dotc.core.Contexts.Context
+import dotty.tools.dotc.core.StdNames._
+import dotty.tools.io.{AbstractFile, Directory, PlainDirectory, VirtualDirectory}
+import dotty.tools.repl.AbstractFileClassLoader
+
+import scala.quoted.Expr
+import java.io.ByteArrayOutputStream
+import java.io.PrintStream
+import java.net.URLClassLoader
+import java.nio.charset.StandardCharsets
+
+class QuoteDriver extends Driver {
+
+  def run[T](expr: Expr[T], settings: Runners.RunSettings): T = {
+    val ctx: Context = initCtx.fresh
+    ctx.settings.optimise.update(settings.optimise)(ctx)
+
+    val outDir: AbstractFile = settings.outDir match {
+      case Some(out) =>
+        val dir = Directory(out)
+        dir.createDirectory()
+        new PlainDirectory(Directory(out))
+      case None =>
+        new VirtualDirectory("(memory)", None)
+    }
+
+    val driver = new dotty.tools.dotc.quoted.ExprCompiler(outDir)
+    driver.newRun(ctx).compileExpr(expr)
+
+    val classLoader = new AbstractFileClassLoader(outDir, this.getClass.getClassLoader)
+
+    val clazz = classLoader.loadClass(driver.outputClassName.toString)
+    val method = clazz.getMethod("apply")
+    val instance = clazz.newInstance()
+
+    method.invoke(instance).asInstanceOf[T]
+  }
+
+  def show(expr: Expr[_]): String = {
+    val ctx: Context = initCtx.fresh
+    ctx.settings.color.update("never")(ctx) // TODO support colored show
+    val baos = new ByteArrayOutputStream
+    var ps: PrintStream = null
+    try {
+      ps = new PrintStream(baos, true, "utf-8")
+
+      new dotty.tools.dotc.quoted.ExprDecompiler(ps).newRun(ctx).compileExpr(expr)
+
+      new String(baos.toByteArray, StandardCharsets.UTF_8)
+    }
+    finally if (ps != null) ps.close()
+  }
+
+  override def initCtx: Context = {
+    val ictx = super.initCtx.fresh
+    var classpath = System.getProperty("java.class.path")
+    this.getClass.getClassLoader match {
+      case cl: URLClassLoader =>
+        classpath = cl.getURLs.map(_.getFile()).mkString("", ":", if (classpath == "") "" else ":" + classpath)
+      case _ =>
+    }
+    ictx.settings.classpath.update(classpath)(ictx)
+    ictx
+  }
+
+}

src/test/scala/quoted/util/Runners.scala

@@ -0,0 +1,44 @@
+// QUICK FIX
+// TODO remove this file in 0.7
+// Copy of fix in https://github.com/lampepfl/dotty/pull/3871
+
+package scala.quoted
+package util
+
+import dotty.tools.dotc.ast.Trees.Literal
+import dotty.tools.dotc.core.Constants.Constant
+import dotty.tools.dotc.printing.RefinedPrinter
+
+import scala.quoted.Expr
+import scala.quoted.Liftable.ConstantExpr
+import scala.runtime.quoted._
+
+/** Default runners for quoted expressions */
+object Runners {
+
+  implicit def runner[T]: Runner[T] = new Runner[T] {
+
+    def run(expr: Expr[T]): T = Runners.run(expr, RunSettings())
+
+    def show(expr: Expr[T]): String = expr match {
+      case expr: ConstantExpr[T] =>
+        val ctx = new QuoteDriver().initCtx
+        ctx.settings.color.update("never")(ctx)
+        val printer = new RefinedPrinter(ctx)
+        printer.toText(Literal(Constant(expr.value))).mkString(Int.MaxValue, false)
+      case _ => new QuoteDriver().show(expr)
+    }
+  }
+
+  def run[T](expr: Expr[T], settings: RunSettings): T = expr match {
+    case expr: ConstantExpr[T] => expr.value
+    case _ => new QuoteDriver().run(expr, settings)
+  }
+
+  case class RunSettings(
+    /** Enable optimisation when compiling the quoted code */
+    optimise: Boolean = false,
+    /** Output directory for the copiled quote. If set to None the output will be in memory */
+    outDir: Option[String] = None
+  )
+}

src/test/scala/quoted/util/liftables/TuplesTest.scala

@@ -1,24 +1,26 @@
 package scala.quoted
-package util.liftables
+package util
+package liftables
 
 import org.junit.Test
 import org.junit.Assert._
 
-import dotty.tools.dotc.quoted.Runners._
+import util.Runners._
 
 class TuplesTest {
 
   @Test def testLifing: Unit = {
+    // FixClasspath()
     import Tuples._
-    val t1: Expr[Tuple1[Int]] = Tuple1(5)
+    val t1: Expr[Tuple1[Int]] = Tuple1(1)
     val t2: Expr[(Int, Int)] = (1, 2)
     val t3: Expr[(Int, Int, Int)] = (1, 2, 3)
     val t4: Expr[(Int, Int, Int, Int)] = (1, 2, 3, 4)
 
-    // FIXME
-    // t1.run
-
-
+    assertEquals(Tuple1(1), t1.run)
+    assertEquals((1, 2), t2.run)
+    assertEquals((1, 2, 3), t3.run)
+    assertEquals((1, 2, 3, 4), t4.run)
   }
 
 }