Module Pl.Annot

type hints = {
  1. prose : Hints.Alter.t option;
  2. prose_in : Hints.Alter.t option;
  3. prose_out : Hints.Alter.t option;
  4. prose_true : Hints.Alter.t option;
  5. prose_false : Hints.Alter.t option;
  6. prose_fields : Hints.Fields.t option;
  7. prose_input_exps : Sl.exp list option;
  8. prose_output_exps : Sl.exp list option;
}
val empty : hints
type 'a t = {
  1. node : 'a;
  2. hints : hints;
}
val no_hints : 'a -> 'a t