val generate : extension_name:string ‑> nil:(tps:Ppxlib.core_type list ‑> record_name:string ‑> Ppxlib.Location.t ‑> 'new_record_sig) ‑> record:(tps:Ppxlib.core_type list ‑> record_name:string ‑> Ppxlib.Location.t ‑> Ppxlib.label_declaration list ‑> 'new_record_sig) ‑> loc:Ppxlib.Location.t ‑> path:string ‑> (Ppxlib.rec_flag * Ppxlib.type_declaration list) ‑> 'new_record_sig