author | cu |
Tue, 10 Oct 2017 18:53:30 +0100 | |
changeset 516 | ff643cbb7142 |
parent 356 | d9c784c71305 |
child 520 | 2849c305b12d |
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 |
356
d9c784c71305
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
288
diff
changeset
|
3 |
case class Chr(c: Char) extends Val |
288
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 |
356
d9c784c71305
updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents:
288
diff
changeset
|
8 |
case class Rec(x: String, v: Val) extends Val |