File: t2864.scala

package info (click to toggle)
scala 2.9.2%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 67,208 kB
  • sloc: java: 27,488; xml: 4,412; python: 2,297; sh: 734; makefile: 16; ansic: 6
file content (30 lines) | stat: -rw-r--r-- 593 bytes parent folder | download | duplicates (2)
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
import scala.util.continuations._
object Test {

  def double[B](n : Int)(k : Int => B) : B = k(n * 2)

  def main(args : Array[String]) {
     reset {
       val result1 = shift(double[Unit](100))
       val result2 = shift(double[Unit](result1))
       println(result2)
     }
  }

  def foo: Int @cps[Int] = {
    val a0 = shift((k:Int=>Int) => k(0))
    val x0 = 2
    val a1 = shift((k:Int=>Int) => x0)
    0
  }

/*
  def bar: ControlContext[Int,Int,Int] = {
    shiftR((k:Int=>Int) => k(0)).flatMap { a0 =>
    val x0 = 2
    shiftR((k:Int=>Int) => x0).map { a1 =>
    0
    }}
  }
*/
}