let register_prefix s =
  Hashtbl.replace reserved_prefix_tbl s ()