The following is an invalid µOCCAM program. This is just a workout for the lexer and parser. Probably not semantically correct, but syntax should be O.K. If not feel free to shout at me :) 14/2/01 - Okay, cleared up the Silent_Bob problem, so should now be syntactically correct. Changed it from an accept to a reject as requested, sorry it took so long...
/public/cs3/web/ipptests/A_few_things.reject
SEQ
SEQ
SEQ
SEQ
SEQ
PAR
PAR
INT Snootchy = 0:
INT Nootchy = 0:
INT Silentbob = 13:
INT Jay = 4:
INT Walter = 900:
STOP
SKIP
Brodie ( Snootchy [Nootchy])
-- A random comment.
IF
Jay = 4
SEQ
STOP
WHILE Walter <> 12
SKIP
SEQ
SEQ
SEQ
PAR
SEQ
INT Berny = 0:
Dave ? Berny[10]
STOP
SKIP
INT Dude = 0 :
INT Dudes = 0 :
INT Duke = 0 :
--Another comment
SEQ Dude = Dudes FOR (Duke + 2)
PROC Rudolf ( INT Erprising, INT Spired, CHAN du )
SKIP
:
STOP --comment on same line?
STOP