summaryrefslogblamecommitdiff
path: root/tests/source/test4.scade
blob: 843302f9be73f055c68b98be261c3e7be3fa00b9 (plain) (tree)
1
2
3
4
5
6
7
                                                         
   
                  
                                                   

                   
   
node test(i: int) returns(probe a, b, c: int; exit: bool)
let
    exit = i >= 5;
    a = 0 -> (if pre a >= 5 then 0 else pre a + 1);
    b = 0 -> pre i;
    c = 0;
tel