Source

mutated_ocaml / testsuite / typeloc / obj_new.ml

1
2
3
class t = object end
let _ = [ new t;  (* NG, wrong position is reported! *)
          None ]