author | Christian Urban <christian dot urban at kcl dot ac dot uk> |
Mon, 17 Nov 2014 08:38:52 +0000 | |
changeset 308 | 3703ade9b17c |
parent 288 | 39aeca14af8c |
child 356 | d9c784c71305 |
permissions | -rw-r--r-- |
288
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
1 |
abstract class Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
2 |
case object Empty extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
3 |
case class Char(c: Char) extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
4 |
case class Seq(v1: Val, v2: Val) extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
5 |
case class Left(v: Val) extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
6 |
case class Right(v: Val) extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
7 |
case class Stars(vs: List[Val]) extends Val |
39aeca14af8c
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
diff
changeset
|
8 |
case class Rec(x: String, v: Val) extends Val |