Add more evaluation tests

Author: adpi2

compiler/test/dotty/tools/debug/DebugTests.scala

@@ -15,7 +15,7 @@ class DebugTests:
   import DebugTests.*
   @Test def debug: Unit =
     implicit val testGroup: TestGroup = TestGroup("debug")
-    // compileFile("tests/debug/eval-private-members-in-parent.scala", TestConfiguration.defaultOptions).checkDebug()
+    // compileFile("tests/debug/eval-local-class-in-value-class.scala", TestConfiguration.defaultOptions).checkDebug()
     compileFilesInDir("tests/debug", TestConfiguration.defaultOptions).checkDebug()
 
 object DebugTests extends ParallelTesting:

tests/debug/eval-at-default-arg.check

@@ -0,0 +1,3 @@
+break Test$ 6
+eval x + 1
+result 4

tests/debug/eval-at-default-arg.scala

@@ -0,0 +1,8 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    foo(3)()
+
+  def foo(x: Int)(
+    y: Int = x + 1
+  ): Unit =
+    println("foo")

tests/debug/eval-by-name-capture.check

@@ -0,0 +1,4 @@
+break Test$ 5 // main
+break Test$ 5 // main$$anonfun$1
+eval x
+result hello

tests/debug/eval-by-name-capture.scala

@@ -0,0 +1,7 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    val x = "hello"
+    m:
+      x + ", world!"
+
+  def m(y: => String): Unit = println(y)

tests/debug/eval-by-name.check

@@ -0,0 +1,33 @@
+break Test$ 11
+eval x
+result foo
+eval m
+result foofoo
+eval A().m
+result fo
+eval this.m("bar")
+result barbarba
+
+break Test$ 7
+eval x
+result foo
+eval m
+result foofoo
+eval A().m
+result fo
+
+break Test$A$1 10
+eval x
+result foo
+eval m
+result fo
+eval A().m
+result fo
+
+break A 14
+eval x
+result bar
+eval m
+result bar
+eval A("foo").m
+result foo

tests/debug/eval-by-name.scala

@@ -0,0 +1,14 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    println(m("foo") + A("bar").m)
+
+  def m(x: => String): String =
+    def m: String =
+      x + x
+    class A:
+      def m: String =
+        x.take(2)
+    m + A().m
+
+class A(x: => String):
+  def m: String = x

tests/debug/eval-captured-value-class.check

@@ -0,0 +1,23 @@
+break Test$ 14
+eval new A("foo")
+result fo
+eval m("bar")
+result ba
+
+break Test$A$1 9
+eval size
+result 2
+eval size.value
+result 2
+eval new A("foo")
+result fo
+
+break Test$ 12
+eval size
+result 2
+eval size.value
+result 2
+eval new A("foo")
+result fo
+eval m("bar")
+result ba

tests/debug/eval-captured-value-class.scala

@@ -0,0 +1,15 @@
+class Size(val value: Int) extends AnyVal
+
+object Test:
+  def main(args: Array[String]): Unit =
+    val size = new Size(2)
+
+    class A(msg: String):
+      override def toString: String =
+        msg.take(size.value)
+
+    def m(msg: String): String =
+      msg.take(size.value)
+
+    println(new A("foo"))
+    println(m("bar"))

tests/debug/eval-captures.check

@@ -0,0 +1,57 @@
+break A 26
+eval (new B).m
+result x1x2x3x4
+
+break A$B$1 22
+eval x1
+result x1
+eval m // local def m
+result x1x2x3x4
+eval (new B).m
+result x1x2x3x4
+eval A.this.m // compiles but throws NoSuchFieldException
+result java.lang.NoSuchFieldException: $outer
+
+break A$B$1 21
+eval x1
+result x1
+eval x2
+result x2
+eval m
+result x1x2x3x4
+eval (new C).m
+result x1x2x3x4
+eval (new B).m
+result x1x2x3x4
+
+break A$B$1$C$1 19
+eval x1
+result x1
+eval x2
+result x2
+eval x3
+result x3
+eval x4
+result x4
+eval m
+result x1x2x3x4
+eval (new C).m
+result x1x2x3x4
+eval (new B).m
+result x1x2x3x4
+
+break A$B$1$C$1 18
+eval x1
+result x1
+eval x2
+result x2
+eval x3
+result x3
+eval x4
+result x4
+eval m
+result x1x2x3x4
+eval (new C).m
+result x1x2x3x4
+eval (new B).m
+result x1x2x3x4