Module Pl.Group

module Annot = Pl.Annot
type t = {
  1. hints : Annot.hints;
  2. id_rulegroup : Sl.id;
  3. id_rel : Sl.id;
  4. rel_signature : Sl.rel_signature;
  5. exps : (Lang__Pl__.Ast.exp', Sl.typ') Util.Source.note_phrase Pl.Annot.t list;
  6. body : (Lang__Pl__.Ast.instr_group Lang__Pl__.Ast.instr', Lang__Pl__.Ast.inote) Util.Source.note_phrase Pl.Annot.t list;
}
val collect_groups : (Lang__Pl__.Ast.instr_dispatch Lang__Pl__.Ast.instr', Lang__Pl__.Ast.inote) Util.Source.note_phrase Pl.Annot.t list -> t list