summaryrefslogtreecommitdiff
path: root/docs/examples/gadts.scala
diff options
context:
space:
mode:
authorAdriaan Moors <adriaan.moors@typesafe.com>2013-12-09 11:06:22 -0800
committerAdriaan Moors <adriaan.moors@typesafe.com>2013-12-09 17:11:05 -0800
commite55510607031aaf7b8473453f83c44a26c9b97e0 (patch)
tree987d4aeeef387ed435acc64ffadfdf78e6f65bce /docs/examples/gadts.scala
parentdc6dd58d9da441b591580684f3d2f38d7898e7d4 (diff)
downloadscala-e55510607031aaf7b8473453f83c44a26c9b97e0.tar.gz
scala-e55510607031aaf7b8473453f83c44a26c9b97e0.tar.bz2
scala-e55510607031aaf7b8473453f83c44a26c9b97e0.zip
Remove docs/examples; they reside at scala/scala-dist
Diffstat (limited to 'docs/examples/gadts.scala')
-rw-r--r--docs/examples/gadts.scala22
1 files changed, 0 insertions, 22 deletions
diff --git a/docs/examples/gadts.scala b/docs/examples/gadts.scala
deleted file mode 100644
index d2792f4ada..0000000000
--- a/docs/examples/gadts.scala
+++ /dev/null
@@ -1,22 +0,0 @@
-package examples
-
-object gadts extends Application {
-
- abstract class Term[T]
- case class Lit(x: Int) extends Term[Int]
- case class Succ(t: Term[Int]) extends Term[Int]
- case class IsZero(t: Term[Int]) extends Term[Boolean]
- case class If[T](c: Term[Boolean],
- t1: Term[T],
- t2: Term[T]) extends Term[T]
-
- def eval[T](t: Term[T]): T = t match {
- case Lit(n) => n
- case Succ(u) => eval(u) + 1
- case IsZero(u) => eval(u) == 0
- case If(c, u1, u2) => eval(if (eval(c)) u1 else u2)
- }
- println(
- eval(If(IsZero(Lit(1)), Lit(41), Succ(Lit(41)))))
-}
-