This procedure is defined in the server but not documented via ad_proc or proc_doc and may be intended as a private interface.
The procedure is defined as:
proc ::xo::write_file {fn content} { set F [::open $fn w] ::fconfigure $F -translation binary ::puts -nonewline $F $content ::close $F }