Add more evaluation tests

Author: adpi2

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-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

tests/debug/eval-captures.scala

@@ -0,0 +1,26 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    val a = new A
+    println(a.m)
+
+class A:
+  def m: String =
+    val x1 = "x1"
+    class B:
+      def m: String =
+        val x2 = "x2"
+        def m: String =
+          val x3 = "x3"
+          class C:
+            def m: String =
+              val x4 = "x4"
+              def m: String =
+                x1 + x2 + x3 + x4
+              m
+          val c = new C
+          c.m
+        m
+      end m
+    end B
+    val b = new B
+    b.m

tests/debug/eval-exception.check

@@ -0,0 +1,9 @@
+break Test$ 7
+eval throwException()
+result java.lang.Exception: foo
+eval throw new Exception("bar")
+result java.lang.Exception: bar
+eval
+  try throwException()
+  catch case e: Exception => "caught"
+result caught

tests/debug/eval-exception.scala

@@ -0,0 +1,7 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    try throwException()
+    catch case e: Exception => ()
+
+  def throwException(): Unit =
+    throw new Exception("foo")

tests/debug/eval-fields.check

@@ -0,0 +1,25 @@
+break Test$ 4
+eval a.a1
+result a.a1
+eval a.B.b1
+result a.B.b1
+eval new A("aa", 2).a1
+result aa.a1
+eval new A("aa", 2).B.b1
+result aa.B.b1
+
+break A 17
+eval name
+result a
+eval this.n
+result 1
+eval a2
+result a.a2
+eval new A("aa", 2).a2
+result aa.a2
+eval B.b1
+result a.B.b1
+eval C.c1
+result a.C.c1
+eval new A("aa", 2).C.c1
+result aa.C.c1

tests/debug/eval-fields.scala

@@ -0,0 +1,17 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    val a = new A("a", 1)
+    println(a)
+
+class A(name: String, val n: Int):
+  val a1 = s"$name.a1"
+  private val a2 = s"$name.a2"
+
+  object B:
+    val  b1 = s"$name.B.b1"
+
+  private object C:
+    val c1 = s"$name.C.c1"
+
+  override def toString: String =
+    name + a2

tests/debug/eval-inner-class.check

@@ -0,0 +1,27 @@
+break Test$ 4
+eval a1
+result A
+eval a2(new A)
+result a2
+eval a1.a3
+result a3
+eval (new A).a3("foo")
+result a3(foo)
+eval new test.B
+result B
+eval test.b2(test.b1)
+result b2
+eval test.b1.b3
+result b3
+eval (new test.B).b3("foo")
+result b3(foo)
+
+break Test 17
+eval new B
+result B
+eval b2(new this.B)
+result b2
+eval (new B).b3
+result b3
+eval b1.b3("foo")
+result b3(foo)

tests/debug/eval-inner-class.scala

@@ -0,0 +1,25 @@
+object Test:
+  def main(args: Array[String]): Unit =
+    val test = new Test
+    test.m()
+
+  private def a1: A = new A
+  private def a2(a: A): String = "a2"
+
+  class A:
+    val a3: String = "a3"
+    def a3(x: String): String = s"a3($x)"
+    override def toString: String = "A"
+end Test
+
+class Test:
+  def m(): Unit =
+    println("test.m()")
+
+  private def b1: B = new B
+  private def b2(b: B) = "b2"
+
+  private class B:
+    val b3: String = "b3"
+    def b3(x: String): String = s"b3($x)"
+    override def toString: String = "B"