$c+
module test10_2
{ This test makes many typing errors
-- NOTE. The sample compiler may fail some of 
-- these tests.  }
private

integer x;
Boolean y;

begin

 x := 3 + true;
 x := 3 * true;
 x := true + 3;
 x := true * 3;
 x := 3 & true;
 x := true & 3;
 x := - true;
 x := ~3;
 
 x := y;
 y := x;
 
x := -y;
x := ~x;
x := x + y;
x := y + x;
x := x * y;
x := y * x;
x := x | y;
x := y | x;

x := (x + y) + x;
x := x + (x + y);
end. { 20 errors, one in each statement. }