Code_or_metadata.View
type t = private
| Code_present of Code.t
| Metadata_only of Code_metadata.t
val print : Format.formatter -> t -> unit