module Instr: sig .. end
sig
end
include Cil_datatype.S_with_pretty
val loc : t -> Cil_types.location
t -> Cil_types.location