val show :
[< `Left of GoblintCil.varinfo| `Right of GoblintCil.varinfo * Z.t Offset.t ]->
string
val printXml :
'aBatInnerIO.output->[< `Left of GoblintCil.varinfo| `Right of GoblintCil.varinfo * Z.t Offset.t ]->
unit
val to_yojson :
[< `Left of GoblintCil.varinfo| `Right of GoblintCil.varinfo * Z.t Offset.t ]->Yojson.Safe.t
val relift :
[< `Left of GoblintCil.varinfo| `Right of GoblintCil.varinfo * Z.t Offset.t ]->[> `Left of GoblintCil.varinfo| `Right of GoblintCil.varinfo * Z.t Offset.t ]
val name : unit -> string
val protecting : 'a->[> `Left of 'a ]
val protected : 'a->[> `Right of 'a ]
val is_write_only : [< `Left of 'a| `Right of 'b ]-> bool