progs/tests/expression/boolean_order.sy


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

start :: fn {
    ts := 0
    t :: fn -> bool {
        ts += 1
        ret true
    }

    fs := 0
    f :: fn -> bool {
        fs += 1
        ret false
    }

    i :: fn -> bool {
        <!>
        ret false
    }

    if t() || i() && i() {
        // This block is intentionally left blank
    } else {
        <!>
    }

    if f() && i() || t() {
        // This block is intentionally left blank
    } else {
        <!>
    }

    fs <=> 1
    fs = 0
    ts <=> 2
    ts = 0

    f() && i() || f() <=> t() && f() || f()
    f() && i() || f() <=> (t() && f()) || f()
    t() && t() && f() || t() <=> t() || i() && i() && i()

    fs <=> 9
    ts <=> 6
}