parsing_c/token_annot.mli

   1 type annot_key =
   2     Exclude_start
   3   | Exclude_end
   4
   5 type annot_val =
   6   Unit
   7
   8 type annots
   9
  10 val empty : annots
  11 val get_annot : annots -> annot_key -> annot_val option
  12 val put_annot : annot_key -> annot_val -> annots -> annots