let string_of_ts_nte_inline (doc_settings : t_doc_settings) (nte_table : t_nte_table) (path : t_path) (nte_inline : ts_nte_inline) : string =
match nte_inline with
|Cs_nte_inline (_,i) ->
let rec aux (table : t_nte_table) : string =
match table with
|[] -> let _ : unit = IO.print_warning (String.concat "" [
"WARNING: footnote ";
string_of_path doc_settings path;
" contains a footnote; nested footnotes are not supported.";
]) in "??"
|(Ftn_entry_inline (Cs_nte_inline (_,j), _, n))::tl ->
if i=j then string_of_path doc_settings [NTE_NODE n]
else aux tl
|hd::tl -> aux tl
in
aux nte_table