diff options
Diffstat (limited to 'Test/datatypes')
-rw-r--r-- | Test/datatypes/t1.bpl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Test/datatypes/t1.bpl b/Test/datatypes/t1.bpl index 61409465..b56e26ae 100644 --- a/Test/datatypes/t1.bpl +++ b/Test/datatypes/t1.bpl @@ -16,5 +16,9 @@ procedure foo() assert value#node(node(x, nil())) == x;
assert children#node(node(x, nil())) == nil();
- assert (cons(leaf(), nil()) == nil());
+ assert (cons(leaf(), nil()) != nil());
+
+ assert is#nil(nil());
+
+ assert is#node(leaf());
}
\ No newline at end of file |