sig
  val intern : ?dont_create:bool -> string -> Gdk.atom
  val name : Gdk.atom -> string
  val none : Gdk.atom
  val primary : Gdk.atom
  val secondary : Gdk.atom
  val clipboard : Gdk.atom
  val string : Gdk.atom
end