diff options
| author |  Jason Koenig <unknown> | 2012-07-30 12:54:07 -0700 |
|---|---|---|
| committer | Jason Koenig <unknown> | 2012-07-30 12:54:07 -0700 |
| commit | 096908b4bd4be630d7adf7448dea7eeb03e83d47 (patch) | |
| tree | 84e8339ce6674338a07d44cd150fd18f5f715452 /Test/dafny0/Datatypes.dfy | |
| parent | 07cc86c1de92e885393058a24e1cbbb9301c0715 (diff) | |
Dafny: updated test suite to new syntax
Diffstat (limited to 'Test/dafny0/Datatypes.dfy')
| -rw-r--r-- | Test/dafny0/Datatypes.dfy | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/Test/dafny0/Datatypes.dfy b/Test/dafny0/Datatypes.dfy index c4899f38..70177ef4 100644 --- a/Test/dafny0/Datatypes.dfy +++ b/Test/dafny0/Datatypes.dfy @@ -92,24 +92,24 @@ method TestAllocatednessAxioms(a: List<Node>, b: List<Node>, c: List<AnotherNode }
class NestedMatchExpr {
- function Cadr<T>(a: List<T>, default: T): T
+ function Cadr<T>(a: List<T>, Default: T): T
{
match a
- case Nil => default
+ case Nil => Default
case Cons(x,t) =>
match t
- case Nil => default
+ case Nil => Default
case Cons(y,tail) => y
}
// CadrAlt is the same as Cadr, but it writes its two outer cases in the opposite order
- function CadrAlt<T>(a: List<T>, default: T): T
+ function CadrAlt<T>(a: List<T>, Default: T): T
{
match a
case Cons(x,t) => (
match t
- case Nil => default
+ case Nil => Default
case Cons(y,tail) => y)
- case Nil => default
+ case Nil => Default
}
method TestNesting0()
{
|