General Test

The following is valid µOCCAM. This is a general test which tests comments, blank lines and stuff.

Program file: /public/cs3/web/ipptests-phase-1/generaltest.accept

SEQ
  IF               -- plenty of comments
    x > y             --here as well
      SEQ neil = 5 FOR 7
        STOP
  WHILE y > x            -- and here
    SKIP
  STOP
  neil ( has, submitted, a, test, program )