File: simplelists.scala

package info (click to toggle)
scala 2.3.0-1.1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 14,000 kB
  • ctags: 325
  • sloc: xml: 1,772; sh: 1,248; java: 390; makefile: 36
file content (16 lines) | stat: -rw-r--r-- 418 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
abstract class List[+a] {
  def head: a
  def tail: List[a]
  def cons[b >: a](x: b): List[b] = new Cons[b, a](x, this)
}

object Nil extends List[Nothing] {
  def error(msg: String): Nothing = throw new java.lang.Error(msg)
  def head: Nothing = error("Nil.head")
  def tail: List[Nothing] = error("Nil.tail")
}

class Cons[c, d <: c](x: c, xs: List[d]) extends List[c] {
  def head: c = x
  def tail: List[c] = xs
}