SGML_string(context, "<HTML><HEAD><TITLE>source</TITLE></HEAD>" "<BODY><PRE>") ;
mark_htext_as_source = TRUE; SGML_string(context, "<HTML><HEAD><TITLE>source</TITLE></HEAD><BODY><PRE>");
PUBLIC HTStream* SGML_new  ARGS3(	CONST SGML_dtd *,	dtd,	HTParentAnchor *,	anchor,	HTStructured *,		target){    int i;    HTStream* context = (HTStream *) malloc(sizeof(*context));    if (!context)	outofmem(__FILE__, "SGML_begin");    context->isa = &SGMLParser;    context->string = HTChunkCreate(128);	/* Grow by this much */    context->dtd = dtd;    context->target = target;    context->actions = (CONST HTStructuredClass*)(((HTStream*)target)->isa);					/* Ugh: no OO */    context->unknown_tag = &HTTag_unrecognized;    context->state = S_text;    context->element_stack = 0;			/* empty */    context->inSELECT = FALSE;#ifdef CALLERDATA    context->callerData = (void*) callerData;#endif /* CALLERDATA */    for (i = 0; i < MAX_ATTRIBUTES; i++)	context->value[i] = 0;    context->lead_exclamation = FALSE;    context->first_dash = FALSE;    context->end_comment = FALSE;    context->doctype_bracket = FALSE;    context->first_bracket = FALSE;    context->second_bracket = FALSE;    context->isHex = FALSE;    context->node_anchor = anchor; /* Could be NULL? */    context->utf_count = 0;    context->utf_char = 0;    context->utf_buf[0] = context->utf_buf[6] = '\0';    context->utf_buf_p = context->utf_buf;    UCTransParams_clear(&context->T);    context->inUCLYhndl = HTAnchor_getUCLYhndl(anchor,					       UCT_STAGE_PARSER);    if (context->inUCLYhndl < 0) {	HTAnchor_copyUCInfoStage(anchor,				 UCT_STAGE_PARSER,				 UCT_STAGE_MIME,				 -1);	context->inUCLYhndl = HTAnchor_getUCLYhndl(anchor,						   UCT_STAGE_PARSER);    }    context->inUCI = HTAnchor_getUCInfoStage(anchor,					     UCT_STAGE_PARSER);    set_chartrans_handling(context, anchor, -1);    context->recover = NULL;    context->recover_index = 0;    context->include = NULL;    context->include_index = 0;    context->url = NULL;    context->csi = NULL;    context->csi_index = 0;#ifdef USE_PSRC    if (psrc_view) {	psrc_view = FALSE;	SGML_string(context, "<HTML><HEAD><TITLE>source</TITLE></HEAD>"			     "<BODY><PRE>") ;	psrc_view = TRUE;	psrc_convert_string = FALSE;	sgml_in_psrc_was_initialized = TRUE;	seen_letter_in_junk_tag = FALSE;    }#endif    return context;}