let make language w =
let gfile = Wpo.file_for_po ~gid:w.po_gid language in
export gfile [
file_for_model ~model:w.po_model language ;
file_for_env ~env:w.po_env language ;
file_for_goal ~gid:w.po_gid language ;
] (fun _fmt -> ()) ;
gfile