test46.tig

来自「编译原理大作业---tiger编译器 包括semant,translate,m」· TIG 代码 · 共 9 行

/* valid rec comparisons */
let 
	type rectype = {name:string, id:int}
	var b:rectype := nil
in
	b = nil;
	b <> nil
end