modern-compiler-ml/tiger/testcases/test46.tig

9 lines
120 B
Text
Raw Normal View History

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