aboutsummaryrefslogtreecommitdiff
path: root/tests/pending/pos/macro-implicit-invalidate-on-error.scala
diff options
context:
space:
mode:
authorodersky <odersky@gmail.com>2014-12-16 17:24:02 +0100
committerodersky <odersky@gmail.com>2014-12-16 17:24:02 +0100
commitba74188596760a0826bc6921358eac22f99265d8 (patch)
tree7cafb3e295768e3e41572dcb505d3deb9571bfcf /tests/pending/pos/macro-implicit-invalidate-on-error.scala
parent63e1bc95d4f72331fabf2fd838bb4e8d5b94ad67 (diff)
parent42851ed2675015d42bb341b82a09bd0bef4a8ce4 (diff)
downloaddotty-ba74188596760a0826bc6921358eac22f99265d8.tar.gz
dotty-ba74188596760a0826bc6921358eac22f99265d8.tar.bz2
dotty-ba74188596760a0826bc6921358eac22f99265d8.zip
Merge pull request #294 from samuelgruetter/tests-rewrite-2
Run rewrite tool on tests (2)
Diffstat (limited to 'tests/pending/pos/macro-implicit-invalidate-on-error.scala')
-rw-r--r--tests/pending/pos/macro-implicit-invalidate-on-error.scala25
1 files changed, 25 insertions, 0 deletions
diff --git a/tests/pending/pos/macro-implicit-invalidate-on-error.scala b/tests/pending/pos/macro-implicit-invalidate-on-error.scala
new file mode 100644
index 000000000..bb83e3cc3
--- /dev/null
+++ b/tests/pending/pos/macro-implicit-invalidate-on-error.scala
@@ -0,0 +1,25 @@
+import scala.language.experimental.macros
+import scala.reflect.macros.blackbox.Context
+
+trait LegacyLiftable[T] {
+ def apply(universe: scala.reflect.api.Universe, value: T): universe.Tree
+}
+
+object LegacyLiftable {
+ implicit def liftCaseClass[T <: Product]: LegacyLiftable[T] = macro liftCaseClassImpl[T]
+
+ def liftCaseClassImpl[T: c.WeakTypeTag](c: Context): c.Expr[LegacyLiftable[T]] = {
+ import c.universe._
+ val tpe = weakTypeOf[T]
+ if (!tpe.typeSymbol.asClass.isCaseClass) c.abort(c.enclosingPosition, "denied")
+ val p = List(q"Literal(Constant(1))")
+ c.Expr[LegacyLiftable[T]] { q"""
+ new LegacyLiftable[$tpe] {
+ def apply(universe: scala.reflect.api.Universe, value: $tpe): universe.Tree = {
+ import universe._
+ Apply(Select(Ident(TermName("C")), TermName("apply")), List(..$p))
+ }
+ }
+ """ }
+ }
+}