summaryrefslogtreecommitdiff
path: root/test/pending/shootout/methcall.scala
blob: 9f7234c72df563ec0b2decc1b7ea704639d95166 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
/* The Computer Language Shootout 
   http://shootout.alioth.debian.org/
   contributed by Isaac Gouy (Scala novice)
*/

object methcall {
   def main(args: Array[String]) = {
      var n = toPositiveInt(args);
      var v: Boolean = false

      val toggle = new Toggle(true);
      for (i <- Iterator.range(1,n)) v = toggle.activate.value;         

      Console println( toggle.activate.value );

      val ntoggle = new NToggle(true,3);
      for (i <- Iterator.range(1,n)) v = ntoggle.activate.value;    
     
      Console println( ntoggle.activate.value );
   }


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


private class Toggle(b: Boolean) {
   var state = b;

   def value = state;

   def activate = {
      state = !state;
      this 
   }
}


private class NToggle(b: Boolean, trigger: Int) 
extends Toggle(b) {

   val toggleTrigger = trigger;
   var count = 0;

   override def activate = {
      count = count + 1;
      if (count >= toggleTrigger) {
         state = !state;
         count = 0;
      }
      this
   }
}