2003-06-24  Akim Demaille  <akim@epita.fr>

	* src/Low.hs (LocationAnn): Don't import it.
	(warn): New.
	Use it.
	Simplify cases specified twice.
	* src/Eval.hs: No longer catch broken Moves, let...
	* src/High.hs: New, ... do it.
	* src/Main.hs: Import and use it.
	(checkM): Rename as...
	(checkLowM): this.
	(checkHighM): New.