www.pudn.com > LexYaccProgs.zip > DIGRAM.L

 
%{ 
 
(* Lex demonstration program for the use of the REJECT routine, taken from 
   the UNIX manual. This program produces a digram table of the input file 
   (counts all pairs of lowercase letters). 
   Usage: digram 0 then 
	writeln(c,d,': ',digram[c,d]); 
end.