Original bug ID: 5596
Reporter: @yakobowski
Assigned to: @alainfrisch
Status: closed (set by @xavierleroy on 2013-08-31T10:49:04Z)
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)

Bug description

---------- mli -------------
module C : sig
type t
val inject : t
end
---------- ml -------------
module C : sig
type t = private I
val inject : t
end =
struct
type t = I
let inject = I
end
let _v = C.inject

Constructor I is incorrectly marked as unused.

Additional information

Svn 12372