Add failing deep set removal test to contracts
This commit is contained in:
parent
79afad5bc7
commit
0b8c0dad3f
@ -17,6 +17,9 @@ function remove_op (const s : set(string)) : set(string) is
|
|||||||
function remove_syntax (var s : set(string)) : set(string) is
|
function remove_syntax (var s : set(string)) : set(string) is
|
||||||
begin remove "foobar" from set s; end with s
|
begin remove "foobar" from set s; end with s
|
||||||
|
|
||||||
|
function remove_deep (var s : set(string) * nat) : set(string) * nat is
|
||||||
|
begin remove "foobar" from set s.0; end with s
|
||||||
|
|
||||||
function patch_op (var s: set(string)) : set(string) is
|
function patch_op (var s: set(string)) : set(string) is
|
||||||
begin patch s with set ["foobar"]; end with s
|
begin patch s with set ["foobar"]; end with s
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user