val gen
  :  context:Context.t
  -> stanzas:(Path.t * Jbuild_types.Stanza.t list) list
  -> packages:string list
  -> unit