notequal.ast

来自「一个编译器修改的例子」· AST 代码 · 共 19 行

function main(argv: array of string): int is
var g: real;
	h: int;
	i: bool;
	j: char;
begin
	g:=0.1;
	(g<>1.0);
	i:=(g<>2.0);
	i:=(1.0<>g);
	h:=3;
	(h<>4);
	i:=(h<>5);
	i:=(5<>h);
	j:='a';
	(j<>'b');
	i:=(j<>'b');
	i:=('b'<>j);
end