|
Scala example source code file (gadts1.scala)
The Scala gadts1.scala source code
object Test{
abstract class Number
case class Int(n: scala.Int) extends Number
case class Double(d: scala.Double) extends Number
trait Term[+a]
case class Cell[a](var x: a) extends Term[a]
case class NumTerm(val n: Number) extends Term[Number]
class IntTerm(n: Int) extends NumTerm(n) with Term[Int]
def f[a](t:Term[a], c:Cell[a]): Unit = {
t match {
case NumTerm(n) => c.x = Double(1.0)
}
t match {
// presently testing that this gets past the parser: eventually
// it should actually work.
case Cell[a](x: Int) => c.x = 5
}
}
val x:Term[Number] = NumTerm(Int(5))
def main(args: Array[String]): Unit = {
val cell = Cell[Int](Int(6))
Console.println(cell)
f[Int](new IntTerm(Int(5)), cell)
Console.println(cell)
}
}
Other Scala examples (source code examples)Here is a short list of links related to this Scala gadts1.scala source code file: |
| ... this post is sponsored by my books ... | |
#1 New Release! |
FP Best Seller |
Copyright 1998-2024 Alvin Alexander, alvinalexander.com
All Rights Reserved.
A percentage of advertising revenue from
pages under the /java/jwarehouse
URI on this website is
paid back to open source projects.