Begin translation module

[tiger.ml.git] / compiler / testcases / test46.tig

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