From 23904f63552d7cb98865d5a07101e2e9795d2ad1 Mon Sep 17 00:00:00 2001
From: Martin Odersky <odersky@gmail.com>
Date: Wed, 31 May 2006 09:47:38 +0000
Subject: fixed bugs 616, 617

---
 test/files/run/bug216.scala |  7 +++++++
 test/files/run/lisp.scala   | 14 ++++++--------
 2 files changed, 13 insertions(+), 8 deletions(-)
 create mode 100644 test/files/run/bug216.scala

(limited to 'test/files/run')

diff --git a/test/files/run/bug216.scala b/test/files/run/bug216.scala
new file mode 100644
index 0000000000..41b2af7b50
--- /dev/null
+++ b/test/files/run/bug216.scala
@@ -0,0 +1,7 @@
+object Test extends Application {
+  object m {
+    val f = x: unit => ();
+    Console.println("OK")
+  }
+  m;
+}
diff --git a/test/files/run/lisp.scala b/test/files/run/lisp.scala
index 34c4e7c7cc..cb26972e2d 100644
--- a/test/files/run/lisp.scala
+++ b/test/files/run/lisp.scala
@@ -15,14 +15,12 @@ class LispTokenizer(s: String) extends Iterator[String] {
   }
   def next: String =
     if (hasNext) {
-      val start = i;
-      var ch = s.charAt(i); i = i + 1;
-      if (ch == '(') "("
-      else if (ch == ')') ")"
-      else {
-        while (i < s.length() && !isDelimiter(s.charAt(i))){ i = i + 1 }
-        s.substring(start, i)
-      }
+      val start = i
+      if (isDelimiter(s charAt i)) i = i + 1
+      else
+        do i = i + 1
+        while (!isDelimiter(s charAt i))
+      s.substring(start, i)
     } else error("premature end of string")
 }
 
-- 
cgit v1.2.3