CTRACE(tfp, "\rHTuncache.. freeing document for '%s'%s\n",
CTRACE((tfp, "\nHTuncache.. freeing document for '%s'%s\n",
PUBLIC void HTuncache_current_document NOARGS{    /*     *  Should remove current document from memory.     */    if (HTMainText) {	HTParentAnchor * htmain_anchor = HTMainText->node_anchor;	if (HText_HaveUserChangedForms()) {	    /*	     * Issue a warning.  User forms content will be lost.	     */	    HTAlert(RELOADING_FORM);	}	if (htmain_anchor) {	    if (!(HTOutputFormat && HTOutputFormat == WWW_SOURCE)) {		FREE(htmain_anchor->UCStages);	    }	}	CTRACE(tfp, "\rHTuncache.. freeing document for '%s'%s\n",			    ((htmain_anchor &&			      htmain_anchor->address) ?			       htmain_anchor->address : "unknown anchor"),			    ((htmain_anchor &&			      htmain_anchor->post_data) ?				      " with POST data" : ""));	HTList_removeObject(loaded_texts, HTMainText);	HText_free(HTMainText);	HTMainText = NULL;    } else {	CTRACE(tfp, "HTuncache.. HTMainText already is NULL!\n");    }}