Merge pull request #2505 from scalamacros/topic/macros

some fixes for macros: one esoteric, and one quite critical

2 files changed, 42 insertions, 0 deletions

diff --git a/test/files/run/macro-system-properties.check b/test/files/run/macro-system-properties.check
new file mode 100644
index 0000000000..dce976df02
--- /dev/null
+++ b/test/files/run/macro-system-properties.check
@@ -0,0 +1,26 @@
+Type in expressions to have them evaluated.
+Type :help for more information.
+
+scala> 
+
+scala>     import language.experimental._, reflect.macros.Context
+import language.experimental._
+import reflect.macros.Context
+
+scala>     object GrabContext {
+      def lastContext = Option(System.getProperties.get("lastContext").asInstanceOf[reflect.macros.runtime.Context])
+      // System.properties lets you stash true globals (unlike statics which are classloader scoped)
+      def impl(c: Context)() = { System.getProperties.put("lastContext", c); c.literalUnit }
+      def grab() = macro impl
+    }
+defined module GrabContext
+
+scala>     object Test { class C(implicit a: Any) { GrabContext.grab } }
+defined module Test
+
+scala>     object Test { class C(implicit a: Any) { GrabContext.grab } }
+defined module Test
+
+scala> 
+
+scala> 
diff --git a/test/files/run/macro-system-properties.scala b/test/files/run/macro-system-properties.scala
new file mode 100644
index 0000000000..e182defc81
--- /dev/null
+++ b/test/files/run/macro-system-properties.scala
@@ -0,0 +1,16 @@
+import scala.tools.nsc._
+import scala.tools.partest.ReplTest
+
+object Test extends ReplTest {
+  def code = """
+    import language.experimental._, reflect.macros.Context
+    object GrabContext {
+      def lastContext = Option(System.getProperties.get("lastContext").asInstanceOf[reflect.macros.runtime.Context])
+      // System.properties lets you stash true globals (unlike statics which are classloader scoped)
+      def impl(c: Context)() = { System.getProperties.put("lastContext", c); c.literalUnit }
+      def grab() = macro impl
+    }
+    object Test { class C(implicit a: Any) { GrabContext.grab } }
+    object Test { class C(implicit a: Any) { GrabContext.grab } }
+  """
+}