diff options
Diffstat (limited to 'test/coq/pass/while_MP_terminating.sail')
| -rw-r--r-- | test/coq/pass/while_MP_terminating.sail | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/test/coq/pass/while_MP_terminating.sail b/test/coq/pass/while_MP_terminating.sail new file mode 100644 index 00000000..d9b71ad9 --- /dev/null +++ b/test/coq/pass/while_MP_terminating.sail @@ -0,0 +1,13 @@ +default Order dec + +$include <prelude.sail> + +register INT : bool + +function test () -> int = { + count : int = 0; + while not_bool(INT) & count < 5 do count = count + 1; + return(count) +} + +termination_measure test while 5 - count |