aboutsummaryrefslogtreecommitdiff
path: root/tests/i/standard-while/program.cps
blob: b610bcaf76ade582b9c1e932c5ecd8ca815b4060 (plain)
1
2
3
4
5
6

DECLARE X : INTEGER
X <- 0
WHILE X < 2
    X <- X + 1
ENDWHILE
OUTPUT X