(* TEST flags = "-w A" * bytecode *) module M = struct type t = int let x = 10 end [@@ocaml.deprecated] let _ = M.x include M