Info.PciDevice
type t = {
vendor_id : int;
device_id : int;
subvendor_id : int;
subdevice_id : int;
revision_id : int;
}
val pp : t Fmt.t