Lex Rules

http://www.moorecad.com/standardpascal/pascal.l