The following is a valid µOCCAM program that performs I/O. Simple test of while loops and Output. Program outputs value of y on each iteration.
Program file:
/public/cs3/web/ipptests/while-test.io
INT x: INT y: SEQ x:=5 y:=0 WHILE x > 0 SEQ y:=y+x stdout ! y x:=x-1 SKIP
When provided with this input:
/public/cs3/web/ipptests/while-test.in
it should generate the following output:
/public/cs3/web/ipptests/while-test.out
==> 5 ==> 9 ==> 12 ==> 14 ==> 15