strcat.scala

来自「JAVA 语言的函数式编程扩展」· SCALA 代码 · 共 28 行

/* The Computer Language Shootout 
   http://shootout.alioth.debian.org/
   contributed by Isaac Gouy (Scala novice)
*/

object strcat {
   def main(args: Array[String]) = {
      var n = toPositiveInt(args);
      val s = "hello\n";
      val b = new StringBuffer(32);

      while (n>0) { b.append(s); n=n-1; }

      Console.println( b.length() );
   }


   private def toPositiveInt(s: Array[String]) = {
      val i = 
         try { Integer.parseInt(s(0)); } 
         catch { case _ => 1 }
      if (i>0) i; else 1;
   }
}