/* * make sure illegal type comparisions throw an error */ module bool_conditions; var i : integer; b : boolean; begin i := 1; b := false; if i > b do end; end